图文教你去除QQ聊天框底部广告方法

通常我们都会发现qq聊天框左下角会不断出现广告，非常碍眼，这款去除QQ聊天框底部广告工具能够还大家一个简洁的qq聊天框。使用方法也很简单，直接打开工具然后在相应地方输入自己的qq号码即可。当然使用本工具前要先退出qq哦。

vbs代码如下：
1.   Const ApplicationData = &H1A& 
2.   Set objShell = CreateObject("Shell.Application") 
3.   Set objFolder = objShell.Namespace(ApplicationData) 
4.   Set objFolderItem = objFolder.Self 
5.   ApplicationDataPath = objFolderItem.Path 
6.   
7.   strQQnum = InputBox("该软件将剔除QQ聊天窗口左下角的广告" & vbCrlf & "1.使用前请确保该号码至少成功登陆一次" & vbCrlf & "2.使用前请关闭QQ","请输入你QQ号码") 
8.   If strQQnum = "" Then
9.   wscript.quit 
10.   End If
11.   
12.   MiscdbFile = ApplicationDataPath & "\Tencent\Users\" & strQQnum & "\QQ\Misc.db" 
13.   
14.   Set objFSO = CreateObject("Scripting.FileSystemObject") 
15.   If objFSO.FileExists(MiscdbFile) Then
16.   objFSO.DeleteFile(MiscdbFile) 
17.   End If
18.   
19.   If not objFSO.FolderExists(MiscdbFile) Then
20.   Set objFolder = objFSO.CreateFolder(MiscdbFile) 
21.   End If