Mar 07
Dim objNetwork
Dim strDriveLetter, strRemotePath, strUser, strPassword, strProfilestrDriveLetter = "X:"
strRemotePath = "\\192.168.0.1\1"
Set objNetwork = CreateObject("WScript.Network")
objNetwork.MapNetworkDrive strDriveLetter, strRemotePath, false, gt, pass
En Yeni Yorumlar