原理

迅雷廣告設定儲存在 Profiles\users\<用戶ID>\vipsettings.ini。腳本自動備份原檔，寫入關閉所有廣告位的鍵值，再以唯讀屬性覆蓋原檔，防止迅雷啟動時重寫。

使用方法

1. 將下列碼存為 Thunder_AdBlock.vbs。
2. 雙擊執行，依提示輸入迅雷安裝目錄（預設 D:\Thunder）與迅雷 ID（無 ID 無法去廣告）。
3. 彈出「恭喜你迅雷廣告已經去除！！！」即完成。

腳本完整碼

Option Explicit
Dim fso, wshshell, ws, del, ID, szBuf, URL, iDelay, OverNum, fie
Set fso = CreateObject("Scripting.FileSystemObject")
Set wshshell = CreateObject("WScript.Shell")
Set ws = CreateObject("WScript.Shell")
Set del = CreateObject("Scripting.FileSystemObject")

szBuf = InputBox("請輸入你的迅雷安裝目錄：", "輸入", "D:\Thunder")
URL = Trim(szBuf)
If Len(URL) = 0 Then WScript.Quit
If MsgBox("路徑為：" & URL & vbCrLf & " 您確定嗎？", 33, "請確認") = 2 Then WScript.Quit

ID = InputBox("請輸入您的迅雷ID（無ID則無法去廣告！）：", "輸入", "")
If Len(ID) = 0 Then WScript.Quit

OverNum = "\Profiles\users\"
fie = "\vipsettings.ini"
iDelay = URL & OverNum & ID & fie

' 建立臨時 ini 寫入去廣告鍵值
ws.run "cmd.exe /c echo  > tmp.ini", 0
ws.run "cmd.exe /c echo THUNDER_MINISITE=0 >> tmp.ini", 0
ws.run "cmd.exe /c echo SKIN_TYPE=1 >> tmp.ini", 0
ws.run "cmd.exe /c echo SKIN_NAME=default >> tmp.ini", 0
ws.run "cmd.exe /c echo FIRST_LOGIN=0 >> tmp.ini", 0
ws.run "cmd.exe /c echo MAIN_AD=0 >> tmp.ini", 0
ws.run "cmd.exe /c echo NEW_TASK_PANEL_AD=0 >> tmp.ini", 0
ws.run "cmd.exe /c echo XUNLEI_TIP=0 >> tmp.ini", 0
ws.run "cmd.exe /c echo WELCOME_PANEL=0 >> tmp.ini", 0
ws.run "cmd.exe /c echo VIP_CFG_SYNCHRO=0 >> tmp.ini", 0

WScript.Sleep 2000
ws.run "cmd.exe /c attrib tmp.ini +R", 0   ' 唯讀保護
WScript.Sleep 2000
fso.CopyFile "tmp.ini", iDelay, True       ' 覆蓋原檔
WScript.Sleep 2000
ws.run "cmd.exe /c attrib " & iDelay & " +R", 0
MsgBox "恭喜你迅雷廣告已經去除！！！"
del.DeleteFile "tmp.ini", True
Set del = Nothing

關鍵廣告鍵值對照

注意事項

• 需知道迅雷登入 ID（非會員也有 ID）。
• 迅雷大版本更新後可能重置設定，需重新執行腳本。
• 腳本會將 vipsettings.ini 設為唯讀，若需恢復廣告，手動移除唯讀屬性並刪除該檔即可。