bat自動創建快捷方式並更換圖標


 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

 

 
        

 


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM