![](https://iknow-base.cdn.bcebos.com/lxb/notice.png)
求一段VBS代码,复制网络上共享出来的文件
我的服务器端:192.168.1.1把文件共享出来了,在客户端上写个VBS把共享文件夹里的图片文件复制下来服务器端192.168.1.1\picture账号wallpap...
我的服务器端:192.168.1.1把文件共享出来了,在客户端上写个VBS把共享文件夹里的图片文件复制下来
服务器端 192.168.1.1\picture
账号wallpaper
密码123456 展开
服务器端 192.168.1.1\picture
账号wallpaper
密码123456 展开
1个回答
展开全部
dim wsh, myPic
set wsh=createObject("wscript.shell")
wsh.run "cmd /c net use \\192.168.1.1\ipc$ 123456 /user:wallpaper",0,1
wsh.run "xcopy \\192.168.1.1\picture D:\picture\ /a",0.1
放在客户机执行
set wsh=createObject("wscript.shell")
wsh.run "cmd /c net use \\192.168.1.1\ipc$ 123456 /user:wallpaper",0,1
wsh.run "xcopy \\192.168.1.1\picture D:\picture\ /a",0.1
放在客户机执行
追问
我的客户端装了还原精灵,所以网卡启动很慢,我要这段代码在开机5分钟后执行,怎么写
追答
Wscript.Sleep 50000 '‘休息5分钟后继续,不过顶多休息到1分钟
CopyWallPaper() ''调用复制文件
Functin CopyWallpaper()
dim wsh, myPic
set wsh=createObject("wscript.shell")
wsh.run "cmd /c net use \\192.168.1.1\ipc$ 123456 /user:wallpaper",0,1
wsh.run "xcopy \\192.168.1.1\picture D:\picture\ /a",0.1
End Function
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询