使用批处理脚本创建桌面共享链接

批处理脚本的实现
通过这个思路，我就可以做一个.cmd或者.bat的批处理文件来实现自动创建桌面 快捷方式及Windows凭据。
然后将脚本文件通过公司企业邮箱发送给各部门同事们，让他们双击安装就可以了。
脚本分析：

//使用cmdkey命令创建Windows凭据，然后调用vbscript生成桌面快捷方式

完整脚本如下：

简约版
@echo off
echo 此脚本用于创建部门扫描文件盘快捷方式
cmdkey /add:192.168.1.240 /user:hr /pass:hr@2019
set Program=\\192.168.240\人力资源部
set LnkName=人力资源部扫描盘
set WorkDir=
set Desc=人力资源部部扫描文件存放共享盘
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.WorkingDirectory=”%WorkDir%”
echo oShellLink.WindowStyle=1
echo oShellLink.Description=”%Desc%”
echo oShellLink.Save)>makelnk.vbs
echo 正在创建桌面快捷方式…请勿退出，耐心等待！
makelnk.vbs
del /f /q makelnk.vbs
mshta vbscript:msgbox(“设置完成！–IT部，By Wolfman”,64,”IT部”)(Window.close)
exit
goto :eof
:GetWorkDir
set WorkDir=%~dp1
set WorkDir=%WorkDir:~,-1%
goto :eof

简约版效果展示

美化版
@echo off
title 安装扫描盘–By Wolfman
mode con cols=43 lines=8
color 1f
echo ※※※※※※※※※※※※※※※※※※※※※※
echo ※   公司专用共享盘快捷方式安装脚本      ※
echo ※           IT部出品                 ※
echo ※先关掉360，腾讯管家，金山毒霸等杀毒软件 ※
echo ※※※※※※※※※※※※※※※※※※※※※※
echo.
pause
cmdkey /add:192.168.1.240 /user:hr /pass:hr@2019
set Program=\\192.168.1.240\人力资源部
set LnkName=人力资源部扫描盘
set WorkDir=
set Desc=人力资源部扫描共享盘
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.WorkingDirectory=”%WorkDir%”
echo oShellLink.WindowStyle=1
echo oShellLink.Description=”%Desc%”
echo oShellLink.Save)>makelnk.vbs
echo ※※※※※※※※※※※※※※※※※※※※※
echo ※                                 ※
echo ※             执行完毕             ※
echo ※                                 ※
echo ※※※※※※※※※※※※※※※※※※※※※
makelnk.vbs
del /f /q makelnk.vbs
exit
goto :eof
:GetWorkDir
set WorkDir=%~dp1
set WorkDir=%WorkDir:~,-1%
goto :eof

美化版效果展示

优化简约版
更简约的直接用windows的mklink命令

@echo off
echo 此脚本用于创建部门扫描文件盘快捷方式–IT菜
::自定义登录凭据及共享路径
set UserName=hr
set PassWord=hr@2019
set IPAddr=192.168.1.240
set FileName=人力资源部
set LnkName=人资专用共享
cmdkey /add:”%IPAddr%” /user:”%UserName%” /pass:”%PassWord%”
mklink /d %userprofile%\desktop\”%LnkName%” ^\^\”%IPAddr%”^\”%FileName%”
mshta vbscript:msgbox(“设置完成！–IT部，By Cai”,64,”IT部”)(Window.close)
exit

mklink /d 目录/快捷方式名 \\网络路径

这样，我们就能快速的创建共享文件的快捷方式了！！