Windows使用批处理脚本创建访问域共享文件夹的快捷方式

在公司域控环境有共享服务器，为每个部门提供相对应权限的共享文件夹。后续新员工要访问共享文件夹时，为了提高工作效率和方便性，直接发个批处理文件过去，员工点击执行会自动记录用户凭证并在桌面创建对应的快捷方式。

批处理方式一：只创建快捷方式，用户名和密码手动输入

@echo off
echo 使用前先关掉360，腾讯管家，金山毒霸等杀毒软件
 
:Program域共享文件夹路径
set Program=\.1.2.14\ci
:LnkName桌面快捷方式显示名称
set LnkName=ci
if not defined WorkDir call:GetWorkDir "%Program%"
(echo Set WshShell=CreateObject("WScript.Shell"^)
echo strDesKtop=WshShell.SpecialFolders("DesKtop"^)
echo Set oShellLink=WshShell.CreateShortcut(strDesKtop^&"\%LnkName%.lnk"^)
echo oShellLink.TargetPath="%Program%"
echo oShellLink.Save)>makelnk.vbs
echo 正在创建桌面快捷方式...请勿退出，耐心等待！
makelnk.vbs
del /f /q makelnk.vbs
mshta vbscript:msgbox("设置完成！--IT部")(Window.close)
exit
goto :eof
:GetWorkDir
set WorkDir=%~dp1
set WorkDir=%WorkDir:~,-1%
goto :eof

批处理方式二：登记用户凭证和创建快捷方式

@echo off
echo 使用前先关掉360，腾讯管家，金山毒霸等杀毒软件
 
:以下是共享服务器地址，用户名和密码
cmdkey /add:10.1.2.14 /user:用户名 /pass:密码
 
:Program域共享文件夹路径
set Program=\.1.2.14\ci
:LnkName桌面快捷方式显示名称
set LnkName=ci
 
if not defined WorkDir call:GetWorkDir "%Program%"
(echo Set WshShell=CreateObject("WScript.Shell"^)
echo strDesKtop=WshShell.SpecialFolders("DesKtop"^)
echo Set oShellLink=WshShell.CreateShortcut(strDesKtop^&"\%LnkName%.lnk"^)
echo oShellLink.TargetPath="%Program%"
echo oShellLink.Save)>makelnk.vbs
echo 正在创建桌面快捷方式...请勿退出，耐心等待！
makelnk.vbs
del /f /q makelnk.vbs
mshta vbscript:msgbox("设置完成！--信息部")(Window.close)
exit
goto :eof
:GetWorkDir
set WorkDir=%~dp1
set WorkDir=%WorkDir:~,-1%
goto :eof

 
如果执行发现乱码，则需要修改编码，先把后缀名bat修改回txt，打开TXT文件选择另存为，把默认编码UTF-8修改为ANSI，并再次修改后缀为bat，点击保存即可。