Question

求vbs 判断盘符是否存在的代码。

on error resume next
dim fu,gui,cgo,mdir,game,mgame
set fu = wscript.createObject("wscript.shell")
Set gui = WScript.CreateObject("Scripting.FileSystemObject")
cgo = "cgo2043.exe"
mdir = wscript.arguments.item(0)
game = wscript.arguments.item(1)
mgame = "cmd /c chdir /d "&mdir&" &&start "&game
If gui.FileExists(mdir & game) Then
fu.run mgame,0,0
else
fu.run cgo
WScript.Sleep(10000)
fu.run mgame,0,0
end if

-----------------------------------
上面的是CGO2043的绿色调用的vbs，点开会出来一个虚拟盘M: 再点一次还是重复同样的步骤，请高人修改一下代码，如果出来了虚盘了就弹出M:\Lnk这个文件夹，以后不管点多少次就只弹出M:\Lnk,谢了。
意思就是如果M盘存在则弹出M:\Lnk,如果M盘不存在则执行上面的代码先，然后再弹出M:\Lnk

以上代码是真实能用的。

Answer 1

if CreateObject("Scripting.FileSystemObject").DriveExists("盘符") then

CreateObject("WScript.Shell").run("你要打开的文件夹")

else

你的代码

end if

Answer 2

测试代码不要用on errer rusume next
盘符，要判断最后一个是不是"/"