[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] 请教批处理使用了获取管理员权限命令后路径变缩写了怎么解决?

使用了获取管理员权限命令后
  1. %1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
复制代码
获取当前路径的目录名称时,如果是长目录名,会变成缩写,不使用的话是目录名全称。这个有没有办法解决呢?
另外使用了上述代码后,批处理放在用【subst】做的虚拟映射盘下执行也会出错,不知道有没有办法解决?
  1. @echo off
  2. %1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
  3. cd /d "%~dp0"
  4. set v1=%cd%
  5. set v2=%~dp0%
  6. echo %v1%
  7. echo %v2%
  8. for /f "delims=" %%i in ("%v1%") do (set dzv1=%%~ni)
  9. echo %%cd%%=%dzv1%
  10. for /f "delims=" %%i in ("%v2:~0,-1%") do (set dzv2=%%~ni)
  11. echo %%~dp0%%=%dzv2%
  12. pause
复制代码

回复 1# diablozhao
  1. %1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("""%~f0""","::",,"runas",1)(close)&exit /b
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 2# Batcher


    问题解决了,谢谢大佬~

TOP

返回列表