中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-04 10:11

共 48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行

DOS批处理 & 脚本技术（批处理室） » 请vbs高手分析这段代码错在哪里？？

可打印版本　800 / 3

第1楼　stornager	发表于 2007-05-02 15:29
中级用户　发帖 131　积分 328
请vbs高手分析这段代码错在哪里？？ Dim fso,WshShell Set fso=CreateObject("Scripting.FileSystemObject") fso.CreateTextFile "C:\test.txt" set WshShell=Wscript.CreateObject("WScript.WshShell") Do fso.CopyFile "C:\test.txt","D:\test.txt" WScript.Sleep 6000 Loop 这段程序运行时会显示无法找到名为"WScript.WshShell"的”automation"的类为什么会这样？？？

第2楼　baomaboy	发表于 2007-05-02 15:33
银牌会员　发帖 554　积分 1,513
Dim fso,WshShell Set fso=CreateObject("Scripting.FileSystemObject") fso.CreateTextFile "C:\test.txt" Set WshSHell=WScript.CreateObject("WScript.Shell") 'set WshShell=Wscript.CreateObject("WScript.WshShell") Do fso.CopyFile "C:\test.txt","D:\test.txt" WScript.Sleep 6000 Loop

第3楼　slore	发表于 2007-05-02 15:33
铂金会员　发帖 2,478　积分 5,212
CreateObject("Wscript.Shell")

第4楼　stornager	发表于 2007-05-02 15:43
中级用户　发帖 131　积分 328
我太马虎了，谢谢高手指教！！

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023