中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-12 02:30
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 关于一段组策略中的VBS~ 查看 667 回复 1
楼 主 关于一段组策略中的VBS~ 发表于 2009-06-30 23:12 ·  中国 北京 联通
初级用户
积分 78
发帖 34
注册 2006-12-09 05:10
19年会员
UID 73001
性别 男
状态 离线
想实现:将服务器上\\192.168.1.50\soft\updatepdmoa\update.exe拷贝到当前登录域网户名的桌面上。
可总是报错,求正确方法。感谢~~~


Dim WshShell,path,oShell,fso

Set WshShell=Wscript.CreateObject("Wscript.Shell")
path=WshShell.SpecialFolders("Desktop")


Set fso = Wscript.CreateObject("Scripting.FileSystemObject")
set c=fso.getfile("\\192.168.1.50\soft\updatepdmoa\update.exe")
c.copy(path) //错在这里吗?怎么拷贝到当前用户桌面呢?
set fso = nothing
WScript.quit

新学VBS,实在搞不懂错在哪了,盼高手解答一下。非常感谢 !!!!!!!!!!!!
2 发表于 2009-07-01 09:13 ·  中国 北京 联通
高级用户
★★★
据说是李先生
积分 609
发帖 400
注册 2008-04-23 15:55
18年会员
UID 116706
性别 男
状态 离线
你改成下面这样试试:

c.copy(path&"\new.exe")
论坛跳转: