[文件操作] 批处理如何运行此程序并自动获取当前路径创建快捷方式到桌面上

qq692653880

请问下批处理要运行此程序并自动获取当前路径创建快捷方式到桌面上
应该怎么写，小弟小白一只刚注册论坛来请教！
有请大神帮忙下，感激不尽！

不知道是谁

@echo off
for /f "tokens=2 delims==" %%i in ('wmic process where "name='uninstall.exe'" get executablepath /value') do (
    set FilePath=%%i
)
mshta VBScript:Execute("Set Wsh=CreateObject(""WScript.Shell""):Set Lnk=Wsh.CreateShortcut(""uninstall.lnk""):Lnk.TargetPath=""%FilePath%"":Lnk.Save:close")
pause
复制代码

/zhqsystem/zhq

回复 2# 不知道是谁

他要获取位置,在运行;不是获取运行位置在运行,再改