ShowDriveList 函數(shù)    Dim fso, d, dc, s, n    Set fso = CreateObject("Scripting.FileSystemObject")    Set dc = fso.Drives    For Each d in dc     n = ""   s = s & d.DriveLetter & " - "         If d.DriveType = Remote Then            n = d.ShareName        ElseIf d.IsReady Then            n = d.VolumeName        End If        s = s & n &"<BR>"     Next   ShowDriveList = sEnd Function

相關(guān)文章

非常棒的lcx寫的非常規(guī)運(yùn)行vbs
　這期專欄依舊是vbs，估計大家會有點(diǎn)煩，那我們來點(diǎn)有意思的吧。vbs有一個對像是“SAPI.SpVoice”，可以用它來講英語的
2008-02-02
使用xcacls.vbs(cacls.exe)修改NTFS權(quán)限說明(中文版)
本分步指南介紹如何使用擴(kuò)展的更改訪問控制列表工具 (cacls.exe，對應(yīng)的腳本文件是xcacls.vbs) 修改和查看文件或文件夾的 NTFS 權(quán)限。
2010-08-08
vbs下用Shell.Application獲取圖片分辨率
昨天有人在博客里留言：獲取圖片分辨率也可以用Shell.Application，我比較喜歡用這個。
2011-01-01
VBS教程：方法-Replace 方法
VBS教程：方法-Replace 方法...
2006-11-11
vbs AD日志開啟腳本nableKerbLog的腳本
AD日志開啟腳本
2008-06-06
完整的注冊表操作實(shí)例 VBS腳本
就是個實(shí)例，基本包含了所有對注冊表的操作。
2009-05-05
VBS教程：函數(shù)-Left 函數(shù)
VBS教程：函數(shù)-Left 函數(shù)...
2006-11-11
VBS變量名Wsh等于WScript對象？
昨天晚上朋友的電腦需要定時關(guān)機(jī)，于是打開記事本，敲了幾行代碼（不要問我為什么不用at命令）
2011-10-10
VBS面向?qū)ο缶幊膛cMe關(guān)鍵字使用介紹
Me 關(guān)鍵字代表著類在代碼運(yùn)行時的當(dāng)前實(shí)例（instance），或者說，當(dāng)前對象（object）。
2011-10-10
使用 iisweb.vbs 刪除網(wǎng)站的方法(支持批量刪除)
有時候我們需要批量刪除網(wǎng)站，如果一個一個手工刪除肯定太慢了，這里分享個命令，通過iisweb.vbs批量刪除網(wǎng)站
2014-07-07