|
你这样有个问题,找到重复的文件怎么办??
- @echo off
- setlocal EnableDelayedExpansion
- for %%i in (w v u t s r q p o n m l k j i h g f e d c) do for /f "delims=" %%a in ('dir /a-d /b /s %%i:\A.exe 2^>nul') do (
- if exist %%a set linkpath=%%a
- call :link
- )
- :link
- mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\AAAAA.lnk""):b.TargetPath=""!linkpath!"":b.WorkingDirectory=""%~dp0"":b.Save:close")
- pause
- goto :eof
复制代码 |
|