用vbs找到映射到共享的所有驱动器并重新映射它们
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
| 问： 您好，脚本专家！如何找到映射到\\server1\share的所有启动器，并将它们重新映射到\\server2\share？ --HT-S 答： 你好，HT-S。您知道，不久前MalcolmGladwell出版了一本书，书名为《TheTippingPoint》。简单来说，该书做出了一种假设：某一事物可能在很长一段时间内被忽略，但是当这种忽略至少达到所谓的引爆点时，这个原来无人问津的事物就会忽然变成一种名副其实的时尚。就好像一夜之间它就从一件您从未听说的事物变得似乎随处可见。 这是个有趣的假设，我们似乎在用于映射和取消映射网络驱动器的脚本上看到了这种现象。我们发布“您好，脚本专家！”专栏已经一年多了，而从未提及网络驱动器，并且似乎没有人注意这个问题。然后，突然之间，关于映射和取消映射网络驱动器的问题纷至沓来。我们在几周前回答了第一个这种问题，现在又来回答另一个问题，我们有一个收件箱全都是其他关于网络驱动器的问题。先是呼啦圈，然后是喇叭裤，现在轮到网络驱动器了。自己去想吧。 那么重新映射网络驱动器如何呢？嗯，不论是好是坏，并没有可以自动重新映射网络驱动器的方法；因此，我们不得不退而求其次找出其他解决方法。但这并不是太槽糕：我们可以找到符合条件的所有驱动器，取消映射这些驱动器，然后将每个驱动器重新映射到新的位置。 当然，这听起来挺复杂，但实际上很简单。以下脚本可用来查找映射到\\server1\share的所有驱动器，并将这些驱动器重新映射到\\server2\share： SetobjNetwork=CreateObject("Wscript.Network") SetcolDrives=objNetwork.EnumNetworkDrives Fori=0tocolDrives.Count-1Step2 IfcolDrives.Item(i+1)="\\server1\share"Then strDriveLetter=colDrives.Item(i) objNetwork.RemoveNetworkDrivestrDriveLetter objNetwork.MapNetworkDrivestrDriveLetter,"\\server2\share" EndIf Next 该脚本将首先创建Wscript.Network对象实例。我们应当注意到了，无论何时当我们要映射或取消映射网络驱动器时，都需要使用WindowsScriptHost，这是因为WMI没有任何映射或取消映射驱动器的方法。没关系，这只不过意味着我们的脚本必须在本地计算机上运行。通常情况下都不能针对远程计算机来使用WSH方法。这是一个您不得不面临的限制。（有一个方法可解决此问题：将该脚本作为登录脚本运行。登录脚本将始终在本地运行。） 创建Network对象之后，调用EnumNetworkDrives方法，以便返回计算机上的所有已映射网络驱动器的集合： SetcolDrives=objNetwork.EnumNetworkDrives 这将使我们亲眼见到那个被称为已映射网络驱动器集合的奇特的小东西。今天我们就不详细介绍此集合的体系结构了，请参阅关于网络驱动器的上一个专栏。只需说明每个已映射的驱动器实际占用此集合中的两项：第一项为驱动器号，第二项为UNC路径。如果计算机上有三个已映射的驱动器，则集合内容将如下所示： X: \\server1\share1 Y: \\server2\share2 Z: \\server3\share3 这就是我们必须使用看起来这么奇怪的ForNext循环来遍历集合的原因，此代码行使我们在集合中每隔一项就跳过一项，进而确保我们仅查看各个驱动器号项： Fori=0tocolDrives.Count-1Step2 然后，对于每个驱动器号，我们需要确定相应的UNC路径是否为\\server1\share1。请记住，如果查看集合中的0项（集合中的第一项的索引号为0），则看到的是驱动器号，相应的UNC路径将为该索引号(0)加1。因此，我们用如下代码来确定第一个驱动器是否正好被映射到\\server1\share1： IfcolDrives.Item(i+1)="\\server1\share"Then 让我们假定就是这样。在这种情况下，我们需要获取驱动器号（0项），并将该值存储在名为strDriveLetter的变量中。然后，调用RemoveNetworkDrive方法来取消映射该驱动器，再调用MapNetworkDrive方法将同一驱动器号重新映射到新的共享： objNetwork.MapNetworkDrivestrDriveLetter,"\\server2\share" 不，这并不是所谓的“引爆点”，因为您刚刚推翻了试图遵循这一切的想法。我们知道是有点混乱，但这是由于已映射网络驱动器集合的特殊构造方式而造成的。如果这对于您没有任何意义，尽管忽略它好了，您应当看到事情整体上是有逻辑性的。也许，是有点混乱的逻辑，但仍然是逻辑。 因为这一点比较费解，所以我们举了一个最简单的例子：将名为\\server1\share的共享重新映射到名为\\server2\share的共享。当然还可以将server1上的任何共享重新映射到server2上任何名称相似的共享。但是这对于今天来说可能有点过多了。但是，如果您感兴趣，只需要让我们知道，我们会在不久以后重新关注此主题。 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
关于用vbs找到映射到共享的所有驱动器并重新映射它们的所有评论
