迅雷如何去广告脚本
一路求学网 http://www.16qiuxue.com 阅览次数: 864次 12-28 20:11:10
标签:软件应用教程,电脑学习,电脑入门,http://www.16qiuxue.com
迅雷如何去广告脚本,
Option Explicit
set fso=wscript.createobject("scripting.filesystemobject")
set wshshell=wscript.createobject("wscript.shell")
Set ws = CreateObject("Wscript.Shell")
Set del = CreateObject("Scripting.FileSystemObject")
Dim ID, szBuf, URL, iDelay, fso, OverNum, fie, wshshell, ws, del
szBuf = InputBox( "请输入你的迅雷安装目录:", "输入", "D:\Thunder" )
URL = Trim(szBuf)
OverNum = "\Profiles\users\"
fie ="\vipsettings.ini"
If 0 = Len(URL) Then WScript.Quit
If 2 = MsgBox( "路径为:" & URL & vbCrLf & " 您确定吗?", 32 + 1, "请确认" ) Then WScript.Quit
ID = InputBox( "请输入您的迅雷ID, (没有ID则无法去除广告!)", "输入", "" )
iDelay = URL+OverNum+ID+fie
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
wscript.sleep 2000
ws.run "cmd.exe /c attrib iDelay +R",0
msgbox("恭喜你迅雷广告已经去除!!!")
del.DeleteFile "tmp.ini", True
Set del = Nothing
迅雷如何去广告脚本,迅雷如何去广告脚本
Option Explicit
set fso=wscript.createobject("scripting.filesystemobject")
set wshshell=wscript.createobject("wscript.shell")
Set ws = CreateObject("Wscript.Shell")
Set del = CreateObject("Scripting.FileSystemObject")
Dim ID, szBuf, URL, iDelay, fso, OverNum, fie, wshshell, ws, del
szBuf = InputBox( "请输入你的迅雷安装目录:", "输入", "D:\Thunder" )
URL = Trim(szBuf)
OverNum = "\Profiles\users\"
fie ="\vipsettings.ini"
If 0 = Len(URL) Then WScript.Quit
If 2 = MsgBox( "路径为:" & URL & vbCrLf & " 您确定吗?", 32 + 1, "请确认" ) Then WScript.Quit
ID = InputBox( "请输入您的迅雷ID, (没有ID则无法去除广告!)", "输入", "" )
iDelay = URL+OverNum+ID+fie
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
wscript.sleep 2000
ws.run "cmd.exe /c attrib iDelay +R",0
msgbox("恭喜你迅雷广告已经去除!!!")
del.DeleteFile "tmp.ini", True
Set del = Nothing
迅雷如何去广告脚本,迅雷如何去广告脚本
- ·上一篇:Excel数据透视表应用
- ·下一篇:Potplayer推出,暴风影音该退休了
《迅雷如何去广告脚本》相关文章
- › 迅雷如何去广告脚本
- tag: 暂无联系方式 软件应用,软件应用教程,电脑学习,电脑入门,电脑学习 - 软件应用
网友评论>>
栏目分类
软件应用 推荐
- · 如何快速输入加减乘除符号的
- · 用WPS2010表格计算按揭贷款月供明细账
- · Outlook Express使用技巧大全之基础篇
- · 邮件蠕虫的四招防范技巧
- · OE出现0x800C0131错误如何解决
- · 使用Outlook会导致邮箱锁定吗
- · 永中OFFICE使用技巧轻松打印成绩条
- · 永中OFFICE使用技巧制作繁体艺术字
- · 巧用永中Office制作繁体艺术字
- · 巧用永中office制作倒计时显示牌
- · 保护永中Office的数据公式
- · 保护永中Office 2004中的数据公式
- · 永中Office2004+试用版之快速安装
- · 永中Office2004+试用版之界面浏览
- · WPS文档单元格内容轻松锁定
- · 教你在WPS中输入偏旁部首
- · 减小Word文档的文件大小
- · IME Tool让输入法设置随心所欲图
- · 巧用PPT制作树状结构图
- · 不用图像处理软件改用金山文字来绘制篮球
- · 终极比拼八款主流翻译软件横向对比评测
- · 微软计划开发64位版Office12
- · 微软Office12重装上阵 更偏重XML
- · 用WinRAR合并音频文件
- · 揭穿骗局WinRAR将775MB压缩成13.4MB
- · 就是与众不同——压缩快手QuickZip软件教学