BAT\VBS登录共享目录复制文件

BAT\VBS登录共享目录复制文件

BAT复制文件

将下面代码保存为 .bat 格式文件运行

@echo off
rem 注意修改对应参数
rem 强制获取管理员权限
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit

rem C盘创建soft目录
md C:\soft

rem 登录shar共享目录输入password密码domain\user账号
net use \\192.168.1.1\shar password/user:domain\user

rem 复制shar目录下所有文件到C盘soft目录下，加\s发现子目录下的文件无法全部复制所以只加/e
xcopy  \\192.168.1.1\shar c:\soft /e

VBS复制文件

将下面代码保存为 .VBS格式文件运行

'注意修改对应参数
'定义对象wsh
dim wsh

set fso=createobject("scripting.filesystemobject")
'创建文件夹
set f=fso.createfolder("c:\soft")

set wsh=createObject("wscript.shell")
'登录登录shar共享目录输入password密码domain\user账号
wsh.run "cmd /c net use \\192.168.1.1\shar password/user:domain\user"
'复制shar目录下所有文件到C盘soft目录下，加\s发现子目录下的文件无法全部复制所以只加/e
wsh.run "xcopy /c \\192.168.1.154\shar c:\soft /e"