欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

用vbs實(shí)現(xiàn)刪除名稱(chēng)中有撇號(hào)的文件夾

 更新時(shí)間:2007年03月24日 00:00:00   作者:  
問(wèn):
您好,腳本專(zhuān)家!如何刪除名稱(chēng)中有撇號(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 自己專(zhuān)用的字符。例如,假設(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(chēng)中有撇號(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)為文件夾的名稱(chēng)為:‘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ù)不幸與腳本專(zhuān)家交談的人。那個(gè)問(wèn)題太簡(jiǎn)單了!
那么,有沒(méi)有解決這個(gè)問(wèn)題的方法呢?肯定有。您也許知道,每次在 Where 子句中(例如,在文件路徑中)使用反斜線 (\) 時(shí),必須在其前面放置另一個(gè) \ 來(lái)“轉(zhuǎn)義”反斜線;這就是為什么我們的文件路徑類(lèi)似 C:\\Scripts 而非 C:\Scripts。我們必須這樣做,因?yàn)?nbsp;\ 也是一個(gè)保留字符;指示 VBScript 按原樣使用 \ 的唯一方法就是轉(zhuǎn)義它(只是使用另一個(gè) \ 作為其開(kāi)端)。 
嗨,稍等一下:如果只需使用另一個(gè) \ 作為開(kāi)端就可以使用保留字符 \,或許您也可以使用如單引號(hào)之類(lèi)的保留字符,方法是使用 \ 作為它的開(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'。在文件夾名稱(chēng)中的任何撇號(hào)前面均放一個(gè) \,腳本就可以正常工作了。是的,雖然看起來(lái)有點(diǎn)怪,但確實(shí)起作用。

相關(guān)文章

最新評(píng)論