【批处理】添加共享网盘凭据，创建快捷方式到桌面

添加共享网盘凭据

cmdkey /add:ip /user:hostname\user01 /pass:user01
start \\ip

添加共享网盘延伸，添加共享网盘凭据，创建快捷方式到桌面

@echo off
echo 正在自动加入网盘中...
:以下是共享服务器地址，用户名和密码

net use * /del /y

cmdkey /add:ip /user:name /pass:possword
:Program域共享文件夹路径

set Program=\ip\filename

:LnkName桌面快捷方式显示名称

set LnkName=filename
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("完成        - -xiaoer")(Window.close)

start \ip\filename

exit

goto :eof

:GetWorkDir

set WorkDir=%~dp1

set WorkDir=%WorkDir:~,-1%

goto :eof