用HOOK函数自动关闭IE广告窗口
2008-02-23 05:36:01来源:互联网 阅读 ()
1、弹出式广告框也是IE浏览窗口,一般来说,他是个无菜单、无工具栏窗口。所以能够在桌面上打开一个窗口时,首先判断该窗口类型是否是“IEFrame”,接着判断IEFrame的子窗口类型“WorkerW”的属性是否是不可见(这是一般弹出式广告窗口的特征),这样就能够向该窗口发出关闭的消息,以上步骤一般能自动关闭大部分弹出广告框。
2、通过WINDOWS编程中的钩子(HOOK)函数解决截获在桌面上打开窗口的消息。钩子函数的基本原理就是对WINDOWS系统的某些动作注册,当发生这些事件时首先调用预先配置的回调函数,回调函数处理后,再由原来的函数处理。这里回调函数的作用正是实现1中叙述的功能。因为这里实现的钩子函数是监控其他进程窗口产生的消息,所以必须用动态链接库实现。
主要代码如下:
在动态链接库中,实现钩子回调函数。
LRESULT CALLBACK CallWndProc(
int nCode, // hook code
WPARAM wParam, // current-process flag
LPARAM lParam // address of structure with message data
)
{
CWPSTRUCT *pCwp = NULL;
CString strClassName;
HWND hWnd = NULL;
unsigned long ulStyle = 0;
BOOL bIsClosed = FALSE;
if (nCode < 0)
{
return CallNextHookEx(gHook, nCode, wParam, lParam);
}
if (NULL != lParam)
{
pCwp = (CWPSTRUCT *)lParam;
if (WM_SHOWWINDOW == pCwp->message)
{
::GetClassName(pCwp->hwnd, strClassName.GetBufferSetLength(128), 128);
//IE窗口的类型为IEFrame
if (0 == strClassName.CompareNoCase("IEFrame"))
{
hWnd = ::GetWindow(pCwp->hwnd, GW_CHILD);
if (NULL == hWnd)
{
bIsClosed = TRUE;
}
while (NULL != hWnd)
{
::GetClassName(hWnd, strClassName.GetBufferSetLength(127), 127);
//IEFrame的子窗口包含窗口类型WorkerW
if (0 == strClassName.CompareNoCase("WorkerW"))
{
//若WorkerW不可见,则一般是广告弹出窗口
if (0 == (::GetWindowLong(hWnd, GWL_STYLE) & WS_VISIBLE))
{
bIsClosed = TRUE;
break;
}
break;
}
else
{
bIsClosed = TRUE;
}
hWnd = ::GetWindow(hWnd, GW_HWNDNEXT);
}
//若是IE广告弹出窗口,则关闭
if (TRUE == bIsClosed)
{
::PostMessage(pCwp->hwnd, WM_CLOSE, 0, 0);
}
}
}
}
return CallNextHookEx(gHook, nCode, wParam, lParam);
}
在主程式中,调用DLL中的CallWndProc。
//获得动态链接库句柄
HINSTANCE hmodHook = GetModuleHandle("CloseWndDll.dll");
if (NULL == hmodHook)
{
return TRUE;
}
//配置钩子函数
if (NULL == gHook)
{
gHook = SetWindowsHookEx(WH_CALLWNDPROC,
(HOOKPROC)GetProcAddress(hmodHook, "CallWndProc"), hmodHook, 0);
}
主程式退出时,注意调用钩子卸载函数。
//卸载钩子函数
if (NULL != gHook)
{
UnhookWindowsHookEx(gHook);
gHook = NULL;
}
标签:
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有
上一篇: 用BCB编制OpenGL应用程式
下一篇: Windows API简单入门
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash