1 :: 此腳本主要的作用創建1.自動創建快捷方式;2.自動更換快捷方式圖標 2 @echo off 3 >nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system" 4 if '%errorlevel%' NEQ '0' ( 5 goto UACPrompt 6 ) else ( goto gotAdmin ) 7 :UACPrompt 8 echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs" 9 echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs" 10 "%temp%\getadmin.vbs" 11 exit /B 12 :gotAdmin 13 if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" ) 14 rem 上面的語句是以管理員身份運行這個bat 15 16 for /f "tokens=2*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v Desktop') do set Desktop=%%b 17 rem 通過注冊表查找出桌面所在的位置,並將位置路徑定義為變量Desktop 18 copy d:\taxi.ico %SystemDrive%\Windows\System32\taxi.ico 19 rem 復制快捷方式圖標到系統默認快捷方式圖標路勁下 20 mkdir d:\beifen\ 21 move \Y %Desktop%\區域.url d:\beifen\區域.url 22 move \Y %Desktop%\全局.url d:\beifen\全局.url 23 del %Desktop%\didi.url 24 del %Desktop%\summary.url 25 rem 刪除原有桌面的圖標 26 set file="%Desktop%\summary.url" 27 rem 設定快捷方式圖標變量為file 28 echo [InternetShortcut] >%file% 29 echo URL="www.baidu.com" >>%file% 30 ping -n 2 127.1>nul 31 echo IconIndex=0 >>%file% 32 ping -n 2 127.1>nul 33 rem 延遲更換圖標,否則有時候出現無法識別的現象。 34 echo IconFile=%SystemDrive%\Windows\System32\taxi.ico >>%file% 35 rem 設定快捷方式圖標為自己想要的圖標,(.ico)格式的文件需要轉換生成 36 exit
