主頁 > 知識庫 > 用vbs找到映射到共享的所有驅(qū)動器并重新映射它們

用vbs找到映射到共享的所有驅(qū)動器并重新映射它們

熱門標(biāo)簽:百度地圖標(biāo)注是什么意思 深圳外呼系統(tǒng)收費 外呼系統(tǒng)免費招代理 怎么看地圖標(biāo)注 外呼線路中繼線是什么 拉薩外呼系統(tǒng)業(yè)務(wù) 外呼系統(tǒng)telrobot 合肥高德地圖標(biāo)注 廣州ai電銷機器人一般多少錢
問:
您好,腳本專家!如何找到映射到 \\server1\share 的所有啟動器,并將它們重新映射到 \\server2\share?

-- H T-S

答:
你好,H T-S。您知道,不久前 Malcolm Gladwell 出版了一本書,書名為《The Tipping Point》。簡單來說,該書做出了一種假設(shè):某一事物可能在很長一段時間內(nèi)被忽略,但是當(dāng)這種忽略至少達到所謂的引爆點時,這個原來無人問津的事物就會忽然變成一種名副其實的時尚。就好像一夜之間它就從一件您從未聽說的事物變得似乎隨處可見。

這是個有趣的假設(shè),我們似乎在用于映射和取消映射網(wǎng)絡(luò)驅(qū)動器的腳本上看到了這種現(xiàn)象。我們發(fā)布“您好,腳本專家!”專欄已經(jīng)一年多了,而從未提及網(wǎng)絡(luò)驅(qū)動器,并且似乎沒有人注意這個問題。然后,突然之間,關(guān)于映射和取消映射網(wǎng)絡(luò)驅(qū)動器的問題紛至沓來。我們在幾周前回答了第一個這種問題,現(xiàn)在又來回答另一個問題,我們有一個收件箱全都是其他關(guān)于網(wǎng)絡(luò)驅(qū)動器的問題。先是呼啦圈,然后是喇叭褲,現(xiàn)在輪到網(wǎng)絡(luò)驅(qū)動器了。自己去想吧。

那么重新映射網(wǎng)絡(luò)驅(qū)動器如何呢?嗯,不論是好是壞,并沒有可以自動重新映射網(wǎng)絡(luò)驅(qū)動器的方法;因此,我們不得不退而求其次找出其他解決方法。但這并不是太槽糕:我們可以找到符合條件的所有驅(qū)動器,取消映射這些驅(qū)動器,然后將每個驅(qū)動器重新映射到新的位置。 

當(dāng)然,這聽起來挺復(fù)雜,但實際上很簡單。以下腳本可用來查找映射到 \\server1\share 的所有驅(qū)動器,并將這些驅(qū)動器重新映射到 \\server2\share:

Set objNetwork = CreateObject("Wscript.Network")

Set colDrives = objNetwork.EnumNetworkDrives

For i = 0 to colDrives.Count-1 Step 2
    If colDrives.Item(i + 1) = "\\server1\share" Then
        strDriveLetter = colDrives.Item(i)
        objNetwork.RemoveNetworkDrive strDriveLetter
        objNetwork.MapNetworkDrive strDriveLetter, "\\server2\share"
    End If
Next

該腳本將首先創(chuàng)建 Wscript.Network 對象實例。我們應(yīng)當(dāng)注意到了,無論何時當(dāng)我們要映射或取消映射網(wǎng)絡(luò)驅(qū)動器時,都需要使用 Windows Script Host,這是因為 WMI 沒有任何映射或取消映射驅(qū)動器的方法。沒關(guān)系,這只不過意味著我們的腳本必須在本地計算機上運行。通常情況下都不能針對遠程計算機來使用 WSH 方法。這是一個您不得不面臨的限制。(有一個方法可解決此問題:將該腳本作為登錄腳本運行。登錄腳本將始終在本地運行。)

創(chuàng)建 Network 對象之后,調(diào)用 EnumNetworkDrives 方法,以便返回計算機上的所有已映射網(wǎng)絡(luò)驅(qū)動器的集合:

Set colDrives = objNetwork.EnumNetworkDrives

這將使我們親眼見到那個被稱為已映射網(wǎng)絡(luò)驅(qū)動器集合的奇特的小東西。今天我們就不詳細介紹此集合的體系結(jié)構(gòu)了,請參閱關(guān)于網(wǎng)絡(luò)驅(qū)動器的上一個專欄。只需說明每個已映射的驅(qū)動器實際占用此集合中的兩項:第一項為驅(qū)動器號,第二項為 UNC 路徑。如果計算機上有三個已映射的驅(qū)動器,則集合內(nèi)容將如下所示:

X:
\\server1\share1
Y:
\\server2\share2
Z:
\\server3\share3

這就是我們必須使用看起來這么奇怪的 For Next 循環(huán)來遍歷集合的原因,此代碼行使我們在集合中每隔一項就跳過一項,進而確保我們僅查看各個驅(qū)動器號項:

For i = 0 to colDrives.Count-1 Step 2

然后,對于每個驅(qū)動器號,我們需要確定相應(yīng)的 UNC 路徑是否為 \\server1\share1。請記住,如果查看集合中的 0 項(集合中的第一項的索引號為 0),則看到的是驅(qū)動器號,相應(yīng)的 UNC 路徑將為該索引號 (0) 加 1。因此,我們用如下代碼來確定第一個驅(qū)動器是否正好被映射到 \\server1\share1:

If colDrives.Item(i + 1) = "\\server1\share" Then

讓我們假定就是這樣。在這種情況下,我們需要獲取驅(qū)動器號(0 項),并將該值存儲在名為 strDriveLetter 的變量中。然后,調(diào)用 RemoveNetworkDrive 方法來取消映射該驅(qū)動器,再調(diào)用 MapNetworkDrive 方法將同一驅(qū)動器號重新映射到新的共享:

objNetwork.MapNetworkDrive strDriveLetter, "\\server2\share"

不,這并不是所謂的“引爆點”,因為您剛剛推翻了試圖遵循這一切的想法。我們知道是有點混亂,但這是由于已映射網(wǎng)絡(luò)驅(qū)動器集合的特殊構(gòu)造方式而造成的。如果這對于您沒有任何意義,盡管忽略它好了,您應(yīng)當(dāng)看到事情整體上是有邏輯性的。也許,是有點混亂的邏輯,但仍然是邏輯。

因為這一點比較費解,所以我們舉了一個最簡單的例子:將名為 \\server1\share 的共享重新映射到名為 \\server2\share 的共享。當(dāng)然還可以將 server1 上的任何共享重新映射到 server2 上任何名稱相似的共享。但是這對于今天來說可能有點過多了。但是,如果您感興趣,只需要讓我們知道,我們會在不久以后重新關(guān)注此主題。

標(biāo)簽:臺灣 嘉興 六安 玉林 漳州 延安 廣安 周口

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《用vbs找到映射到共享的所有驅(qū)動器并重新映射它們》,本文關(guān)鍵詞  用,vbs,找到,映,射到,共享,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《用vbs找到映射到共享的所有驅(qū)動器并重新映射它們》相關(guān)的同類信息!
  • 本頁收集關(guān)于用vbs找到映射到共享的所有驅(qū)動器并重新映射它們的相關(guān)信息資訊供網(wǎng)民參考!
  • 企业400电话

    智能AI客服机器人
    15000

    在线订购

    合计11份范本:公司章程+合伙协议+出资协议+合作协议+股权转让协议+增资扩股协议+股权激励+股东会决议+董事会决议

    推薦文章