1

我花了几个月的时间尝试获取有关如何映射网络驱动器、断开它们以及重新映射网络驱动程序的 Visual Basic 2010 代码。

我需要能够将其映射到配置文件文件夹,如下所示:完整路径;“\10.10.10.12\Profile 文件夹”。我需要登录才能访问网络文件夹/user:Domainname\UserName Password,然后通过消息确认映射是否成功。

映射后,我将请求配置文件名称并检查网络上是否存在此类配置文件文件夹。如果存在,则返回一条消息,说明配置文件存在,并删除配置文件文件夹,覆盖任何文件夹属性,例如只读等。

还有其他任务,但他是我陷入死胡同的地方。

4

1 回答 1

1

这个问题很老,但也许OP仍在寻找。不久前,我写了一个 HTA 页面来将网络地址映射到虚拟驱动器。代码是 VBScript,因此使用 WScript 库,它不是 VB.net 的本机部分。有关更多信息,请参阅StackOverflow 上的 VB.Net 中的 WScript 。

连接脚本:

SUB doLogOn()
Dim objNetwork, errNum, ojbFSO, strDrive, iNum
Set objFSO = CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists("\\MyServer\MyFolder\") = False Then
   strDrive = "J:"
   Set objNetwork = CreateObject("WScript.Network")
   On Error Resume Next
   objNetwork.MapNetworkDrive strDrive, "\\MyServer\MyFolder", False, "username", "password"
   If Err.Number <> 0 Then
          Err.Clear
   End If
   Set objFSO = Nothing
   Set objNetwork = Nothing
End If
END SUB

就个人而言,我还没有找到在.Net 中做同样事情的代码。上面显示的 VBScript 非常原始。不过,我希望它加上绑定 WScript 的信息能给你一两个想法。

编辑:在这里查看 Eric Dalnas 的代码

于 2013-02-22T00:06:47.223 回答