在我工作的公司,我们最近更改了文件服务器,旧的称为“EXAMPLE-FS-001”,典型的驱动器映射为 \example-fs-001\staff_directory\staffname
新服务器名为 companyname.local,典型的驱动器映射为 \companyname.local\shares\staff_directory\staffname。
我们使用的是 Server 2012 R2。
为了帮助 IT 帮助台免于被“我的网络驱动器无法正常工作”的票证轰炸,我想创建一个脚本,该脚本将在用户计算机上运行并更改网络驱动器路径,但只需替换 \example-fs-001\到 \companyname.local\shares\ 部分。
主驱动器已更改,这将替换手动设置的映射网络驱动器。
我一直在尝试遵循示例,但那里并不存在很多。
示例 1。
Set objNetwork = CreateObject("Wscript.Network")
Set colDrives = objNetwork.EnumNetworkDrives
For (i = 0 to colDrives.Count-1 Step 2){}
If (colDrives.Item(i + 1) = "\\EXAMPLE-FS-001")
{strDriveLetter = colDrives.Item(i)
objNetwork.RemoveNetworkDrive strDriveLetter
objNetwork.MapNetworkDrive strDriveLetter, "\\companyname.local\shares"}
End If
Next
示例 2。
On Error Resume Next
strOldServer = "EXAMPLE-FS-001"
strNewServer = "companyname.local\shares"
Set objNetwork = CreateObject("Wscript.Network")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colDrives = objNetwork.EnumNetworkDrives
For i = 0 to colDrives.Count-1 Step 2
strThisServer = Left(Mid(colDrives.Item(i + 1), 3), InStr(Mid(colDrives.Item(i + 1), 3), "\") - 1)
If LCase(strThisServer) = LCase(strOldServer) Then
strDriveLetter = colDrives.Item(i)
strNewPath = "\\" $strNewServer "\" $Mid(colDrives.Item(i + 1), $Len("\\" & strOldServer & "\") + 1)
If objFSO.FolderExists(strNewPath) = True Then
objNetwork.RemoveNetworkDrive strDriveLetter
objNetwork.MapNetworkDrive strDriveLetter, strNewPath
End If
End If
Next
我是 PowerShell 的新手,但看到了它的奇妙用途,我很想知道我是否在使用这些代码中的任何一个。
谢谢,
阿尔坎