[已解决]帮我看下“查找快捷方式所指向目标.bat”那里出了问题，谢谢

yyz219

czjt1234 发表于 2022-12-28 18:56

    我试一试先 谢谢

yyz219

czjt1234 发表于 2022-12-28 18:56

成功，速度不错
**************************
1.我现在不想粘贴.lnk的路径，将 D:\桌面\Desktop\关机.lnk 直接写入里面（双击就出结果）
2.将结果保存为：#.txt
（不要有任何显示、对话框）

代码应该怎么样？谢谢
   

terse

WScript.Shell 解决部分问题 某些情况下可以用ADODB.Stream处理一下

1. 1>1/* :
   
2. @echo off
   
3. cscript //E:JScript //nologo "%~f0">#.txt
   
4. exit
   
5. */
   
6. var ph = new ActiveXObject('htmlfile').parentWindow.clipboardData.getData('Text');
   
7. var ws = new ActiveXObject("WScript.Shell");
   
8. WSH.Echo(ws.CreateShortcut(ph).TargetPath);

复制代码

yyz219

WScript.Shell 解决部分问题 某些情况下可以用ADODB.Stream处理一下
terse 发表于 2022-12-28 19:53

    我试一试 谢谢

yyz219

WScript.Shell 解决部分问题 某些情况下可以用ADODB.Stream处理一下
terse 发表于 2022-12-28 19:53

    我不知道怎么使用

terse

我不知道怎么使用
yyz219 发表于 2022-12-28 19:58

    存为bat文件

yyz219

存为bat文件
terse 发表于 2022-12-28 22:54

    运行？拖到图标？

czjt1234

回复 32# yyz219


  

1. s = "D:\桌面\Desktop\关机.lnk"
   
2. f = "#.txt"
   
3. 
   
4. Set oWshShell = CreateObject("WScript.Shell")
   
5. Set oWshShortcut = oWshShell.CreateShortcut(s)
   
6. s = oWshShortcut.TargetPath
   
7. Set oFSO = CreateObject("Scripting.FileSystemObject")
   
8. Set oTextStream = oFSO.OpenTextFile(f, 2, True)
   
9. oTextStream.Write s
   
10. oTextStream.Close()

复制代码

yyz219

回复  yyz219
czjt1234 发表于 2022-12-29 09:01

    非常感谢  问题解决了

terse

看你已解决了，还是发上来吧，应该符合你的需求，保存为BAT文件 直接运行

1. 1>1/* : @echo off &cscript //E:JScript //nologo "%~f0" "D:\桌面\Desktop\关机.lnk" >#.txt &exit */
   
2. WSH.Echo(new ActiveXObject("WScript.Shell").CreateShortcut(WSH.Arguments(0)).TargetPath);

复制代码

回复 37# yyz219

yyz219

看你已解决了，还是发上来吧，应该符合你的需求，保存为BAT文件 直接运行回复  yyz219
terse 发表于 2022-12-29 11:51

    非常感谢 我试一试

yyz219

看你已解决了，还是发上来吧，应该符合你的需求，保存为BAT文件 直接运行回复  yyz219
terse 发表于 2022-12-29 11:51

   如果 前面和后面，还有代码就不行吗？

WHY

1. @echo off
   
2. set "Lnk=D:\桌面\Desktop\关机.lnk"
   
3. for /f "delims=" %%i in ('wmic Path Win32_ShortcutFile where "Name='%Lnk:\=\\%'" get target /format:List ^| find ":"') do (
   
4.     set "%%i"
   
5. )
   
6. echo;%target%
   
7. pause

复制代码

yyz219

WHY 发表于 2022-12-30 12:00

    辛苦了，非常感谢

yyz219

WHY 发表于 2022-12-30 12:00

    正常系统中正常

在weiPE中不行