古代花架:vb 拦 IE 弹 出 的 警 告 消 息

来源:百度文库 编辑:高考问答 时间:2024/04/30 21:03:30
弹出警告指的是:网页中《设为首页》 这样的弹出

要么直接不让 它弹出来

要么 在它弹出后,能自动点 确定

我是新人,积分不多,希望大家不要嫌少!
这个我知道,但是对IE这样的弹出findwindow和setwindowpos是不行的。

biaoti = FindWindow(vbNullString, "Microsoft Internet Explorer")
If biaoti <> 0 Then
SetForegroundWindow biaoti
SendKeys "~"
End If

根本不行,不信你试试!

如果你只是自己用的话,大可不必自己编写,这样的软件现在不少。如果是为了学习编程,那我就提示你一下,我这里没有VB不能写源代码给你
API中的findwindow()函数可以找到指定标题的窗口
setwindowpos()函数可以激活窗口
VB中的Sendkeys过程可以向插入点发送指定的键盘按键
如果我说这些你还不能明白的话,那么你就先去学一下VB的API,很快就能明白的

对了MozillaFireFox浏览器可以避免JavaScript脚本运行,就不会弹出对话框了