問(wèn)：
您好，腳本專家！如何刪除名稱中有撇號(hào)的文件夾？
-- JH
答：
您好，JH。噢，是的，撇號(hào)：每個(gè)腳本編寫(xiě)者的主要災(zāi)難來(lái)源。撇號(hào)看起來(lái)只是一個(gè)簡(jiǎn)單的小字符，但切莫讓它的外表所迷惑：撇號(hào)（或單引號(hào)）可能是鍵盤(pán)上最致命的字符。無(wú)論您是使用 Active Directory、數(shù)據(jù)庫(kù)，還是文件系統(tǒng)，一個(gè)撇號(hào)就可以給您的腳本帶來(lái)全部災(zāi)難。正如 Bart Simpson 曾經(jīng)形容 Hershey? 的 Milk Dud 糖果，撇號(hào)也是“甜外毒內(nèi)”。
注意：不，Milk Dud 里面并非真的有毒藥。
撇號(hào)的問(wèn)題在于它是“保留”字符，也就是 VBScript 自己專用的字符。例如，假設(shè)您要?jiǎng)h除文件夾 C:\Scripts。下面的腳本就將執(zhí)行這一操作：
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colFolders = objWMIService. _
    ExecQuery("Select * From Win32_Directory Where Name = 'C:\\Scripts'")
For Each objFolder in colFolders
    errResults = objFolder.Delete
Next
如果您仔細(xì)查看 Where 子句，您會(huì)發(fā)現(xiàn)撇號(hào)（或單引號(hào)）用于代表一個(gè)字符串值：‘C:\\Scripts'。這就是我們?cè)谔幚砻Q中有撇號(hào)的文件夾（例如，Ken's Scripts）時(shí)出現(xiàn)問(wèn)題的原因。如果我們嘗試運(yùn)行如下腳本，您猜猜會(huì)發(fā)生什么？
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colFolders = objWMIService. _
    ExecQuery("Select * From Win32_Directory Where Name = 'C:\\Ken's Scripts'")
For Each objFolder in colFolders
    errResults = objFolder.Delete
Next
我們不會(huì)讓您處于緊張的等待狀態(tài)：這個(gè)腳本必然會(huì)失敗。為什么？唔，請(qǐng)看其中的 Where 子句：
Where Name = 'c:\\Ken's Scripts'
因?yàn)樵?nbsp;Where 子句中用撇號(hào)標(biāo)記字符串的起始和結(jié)尾，所以 VBScript 認(rèn)為文件夾的名稱為：‘C:\\Ken'。這本來(lái)沒(méi)問(wèn)題，只可惜緊該字符串后面還有一串字符 (s Scripts')。VBScript 不知道這些雜亂數(shù)據(jù)表示什么，因此它只是放棄且不做任何嘗試。
是的，我們知道。但這就是 VBScript 的工作方式。因?yàn)槠蔡?hào)是一個(gè)保留字符，用來(lái)（還有其它用途）在 Where 子句中標(biāo)記字符串的起始和結(jié)尾。VBScript 只是不了解我們?cè)谡f(shuō)什么。
不，絕對(duì)不是笑話大多數(shù)不幸與腳本專家交談的人。那個(gè)問(wèn)題太簡(jiǎn)單了！
那么，有沒(méi)有解決這個(gè)問(wèn)題的方法呢？肯定有。您也許知道，每次在 Where 子句中（例如，在文件路徑中）使用反斜線 (\) 時(shí)，必須在其前面放置另一個(gè) \ 來(lái)“轉(zhuǎn)義”反斜線；這就是為什么我們的文件路徑類似 C:\\Scripts 而非 C:\Scripts。我們必須這樣做，因?yàn)?nbsp;\ 也是一個(gè)保留字符；指示 VBScript 按原樣使用 \ 的唯一方法就是轉(zhuǎn)義它（只是使用另一個(gè) \ 作為其開(kāi)端）。 
嗨，稍等一下：如果只需使用另一個(gè) \ 作為開(kāi)端就可以使用保留字符 \，或許您也可以使用如單引號(hào)之類的保留字符，方法是使用 \ 作為它的開(kāi)端。 
您知道，這確實(shí)神奇地奏效了：
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colFolders = objWMIService. _
    ExecQuery("Select * from Win32_Directory Where Name = 'C:\\Ken\'s Scripts'")
For Each objFolder in colFolders
    errResults = objFolder.Delete
Next
答案就在這里，JH。請(qǐng)注意我們是如何在撇號(hào)前面放置 \ 的；從而我們得到的結(jié)構(gòu)看起來(lái)像這樣：‘C:\\Ken\'s Scripts'。在文件夾名稱中的任何撇號(hào)前面均放一個(gè) \，腳本就可以正常工作了。是的，雖然看起來(lái)有點(diǎn)怪，但確實(shí)起作用。

最新評(píng)論