Here is a sample that deals with network resources...


*/ Create network object

WSHNetwork = CreateObject("WScript.Network")

*/ Computer name
?WSHNetwork.ComputerName

*/ User Name
?WSHNetwork.UserName

*/ Domain Name
?WSHNetwork.UserDomain

*/ Enumerate through network drives

NetWorkDrives = WSHNetwork.EnumNetworkDrives
?networkdrives.count
For x = 0 to NetWorkDrives.Count - 1 Step 2
?NetWorkDrives.Item(x),NetWorkDrives.Item(x+1)
Next Drive

*/ Map a network Drive

WSHNetwork.MapNetworkDrive("K:", "\\idtmain2\share_f")