1464
社区成员
- 全部
VB如何让程序自动关闭网页弹出的对话框
网页是这样的：
我想让程序自动点击［确定］按钮关闭这个对话框。
API函数 FindWindow(0&, “JavaScript 提醒”) 能找到弹出的对话框句柄，但从网上找了好多方法－－模拟鼠标或发送回车都试过。尝试关闭这个对话框都以失败告终。
肯请高手们帮助解决下！希望能给出具体代码！
<html>
<head>
<script language="JavaScript">
alert("操作成功！")
</script>
</head>
<body>
<p>欢迎您的到来！谢谢您！</p>
</body>
</html>我想让程序自动点击［确定］按钮关闭这个对话框。
API函数 FindWindow(0&, “JavaScript 提醒”) 能找到弹出的对话框句柄，但从网上找了好多方法－－模拟鼠标或发送回车都试过。尝试关闭这个对话框都以失败告终。
肯请高手们帮助解决下！希望能给出具体代码！
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
taoguangye 2014-08-19
用我这小工具,效果会让你惊喜!
http://download.csdn.net/detail/taoguangye/7780643
wjf598 2014-08-19
谢谢各位的热心帮助。
同样的代码hwnd1有时能获取到句柄，有时也是0，弄不是很明白，但用计时器每隔1秒循环后也能达到目的。
现在又遇到一个问题：
打开一个网页、填写表单、并提交为什么总出错
http://bbs.csdn.net/topics/390864740
of123 2014-08-18
有些网站弹出窗口，是隐藏了按钮句柄的，防止软件控制自动处理。
Carlven2012 2014-08-18
hwnd1 = FindWindow(vbNullString, "JavaScript 提醒")
PostMessage hwnd1, WM_KEYDOWN, vbKeyReturn, 0 ‘发送回车键
已经测试通过（win7 x64 + vb6 + 枫树极速浏览器）
wjf598 2014-08-17
主要问题是找不到子窗口－按钮的句柄，总是返回0，
这是我的代码请帮我看一看：谢谢！
‘.....声明
’执行语句：
hwnd1=FindWindow(0&,"JavaScript 提醒"） '能得到弹出对话框的的句柄
hwnd2=FindWindowEx(hwnd1,0&,0&,"确定") ’就条语句总是返回0
'下面的代码应该没问题吧：
SendMessage hwnd2,WM_LBUTTONDOWN,ByVal 0&,ByVal 0&
SendMessage hwnd2,WM_LBUTTONUP,ByVal 0&,ByVal 0&
一如既往哈 2014-08-17
找到窗口，搜索“确定”句柄，移动鼠标到“确定”窗口的位置，然后模拟鼠标点击，这应该可以的。
要不把你的代码发上来瞧瞧......
wjf598 2014-08-17
是可以关闭，但我想要的是点击［确定］按钮来关闭这个弹出窗口，要不发送回车消息也行，怎么消息就送不过去？！
threenewbee 2014-08-17
sendmessage给对话框，发送wm_close应该可以
taoguangye 2014-08-17
直接JS重写alert函数,让弹窗永远都出不来
一如既往哈 2014-08-17
我测试时hwnd2不为0哦
wjf598 2014-08-17
开始的时候就是这样的，网上介绍的例子是模拟按计算器的1键，是可以找到1键的句柄的，
但对弹出窗口提示时只能得到hwnd1的值，hwnd2总是0。不行，后我才改的代码！
现在主要的问题就是如何获取这个网页弹出窗口的“确定”按钮的句柄了。
现在主要的问题就是如何获取这个网页弹出窗口的“确定”按钮的句柄了。一如既往哈 2014-08-17
hwnd2=FindWindowEx(hwnd1,0&,0&,"确定")
改成下面的试一试：
hWnd2 = FindWindowEx(hWnd1, 0&, "button", vbNullString)
vb6 webbrowser 禁示弹出对话框 Private Sub WebBrowser1_NavigateComplete2(ByVal pDisp As Object, URL As Variant) Dim oDoc1 As HTMLDocument Set oDoc1 = pDisp.Document oDoc1.parentWindow.execScript "function alert()...
vb2008 webbrowser 如何禁止 脚本错误提示 及弹出对话框 1.在form 初始化时将webbrowser控件的ScriptErrorsSuppressed = True（false调试模式，允许脚本错误提示），也可以在其他合适的事件... ' 忽略错误并禁止弹出对话框 e.Handled = True End Sub 3.在webbrowser控
自动弹出提示对话框（附带实例和源码） 1：动画方式弹出，就像MSN的提示框 2：漂亮,详细见配图 3：还可以再在开一个更加详细的内容网页 4：自动关闭，无需手工确认那个ok 5：示例包括C#和VB两个版本，popUp的源文件在EeekSoft.Web.PopupWin文件夹中 6：用...
关于VB6弹出菜单的问题 写一个小程序, 用VB6随意做下界面,离奇的发现弹出菜单居然没有效果,过程如下 创建一个窗体Form1,用菜单编辑器创建一个弹出菜单 弹出菜单子菜单项在这里名称为mPopup1,事件代码为: Option Explicit Private ...
VB获得弹出对话框的内容后关闭它 我使用VB自动填入表单后点击提交，系统弹出一个对话框，我需要获得这个对话框的提示内容后决定下一步的操作。但是新的IE对话框弹出后其他我的程序都停止运行了。不知道怎么操作？求高手指点
怎样自动关闭其它程序弹出的对话框？ 需求：检查桌面上有无弹出的对话框，如果一个对话框已经弹出若干时间（比如20秒）而没有关闭，就把它关掉。 使用vbscript或vb.net，也可以调用windows API。 我的思路是：遍历桌面上所有的对话框，把句柄和时间保存...
JAVA上百实例源码以及开源项目源代码 Java zip压缩包查看程序源码 1个目标文件 摘要:Java源码,文件操作,压缩包查看 Java zip压缩包查看程序，应用弹出文件选择框，选择ZIP格式的压缩文件，可以像Winrar软件一样查看压缩文件内部的文件及文件夹，源码...
vb安装向导已经在该计算机上运行,制作VB安装程序问答（一） 制作VB安装程序问答(一)制作安装程序往往是程序设计的最后一步，同时也是重要的一步，因为运行安装程序往往是用户的第一个操作。有不少读者询问这方面的问题，《答疑解惑》将分两期介绍一些制作Visual Basic安装程序...
MFC基于对话框程序 请打开类视图(ClassView)，如果无误的话，我们可以看到三个类。分别是CAboutDlg, CDialogApp, CDialogDlg这三个类。 其中，CDialogApp是最重要的一个类。双击CDialogApp，打开其定义体。我们会看到它是这么定义的: ...
VB程序破解 VB程序的破解思路总结、编译方式vs破解工具 比较 把一个简单的VB计时器程序研究透了，对于VB破解应有较大帮助，如有错误欢迎指出。 VB程序也是一个非常有趣的东西，你去看VB的主程序，是用Microsoft Visual ...
vb计算机怎么制作,vb6.0怎么制作一个抽奖小程序? vb6.0抽奖器的法 3、每天的同一时间定时自动关机：单击“开始”→“所有程序(p)”→“附件”→“系统工具”→“任务计划”→弹出“任务计划”窗口→在窗口右侧的空白区域单击鼠标右键→在出现的快捷菜单中指向“新建(w)”→在出现的...
bat弹出确认或取消窗口 需要在bat脚本里面弹出取消/确认框提示，可以用下面的案例： 示例： @echo off setlocal enabledelayedexpansion set Vbscript=Msgbox("你的系统即将崩溃，是否立即更新？",1,"系统管理员提醒") for /f ...
【网络课】VB.NET程序设计 作业答案 选择题： ACDBC DAADD BDCDD CDCCB ABDCB DBAAC BACAB CCBCD DAAAA ADAAA DCCCA BBCAA ADDBB DDCDA BCAAB BCAAB DCDDC AAADD CDDCC ABBBA 填空题 ...1、使对象获得焦点的属性是_SetFocus_
VB6.0编写的管理系统，专业而完整，附源代码.rar 一套专业的VB专业管理系统-包含源代码，使用说明： 1.软件所涉及的数据库分为四张表。 lesson kecheng zhuanye ...10.单击“软件简介”弹出本窗体，单击“关于我们”弹出和程序相关信息的窗体。
VB6.0属性过程详解（Property过程）[第二章：属性Set过程的应用（设计如字体属性的具有弹出式对话框的属性... 这里是《VB6.0属性过程详解（Property过程） 》的第二章，如果你没有看过上面的这篇文章，你应该先去看看，除非你觉得你已经初步了解了属性过程的运作机制。 第二章：第一节：属性Set过程的应用 上一章，我...
MFC基于对话框程序，顺序分析 如果是6.0的朋友则首先在菜单上...在向导第一步中选择基于对话框(Dialog based)，直接按完成(Finish)就可以了。 如果是.net的朋友则在菜单上选择新建->项目，在项目类型中选择Visual C++项目，在模板中选择MFC应用
VB程序VB代码：摄像头视频图像的监控，截图，录像（改进） 本程序是“ 实现USB摄像头视频图像的监控，截图，录像 ”的改进。可实现对摄像头视频的监控，截图，录像，可以分别保存为图片文件和视频（压缩）文件。保存的视频文件可以用媒体播放机（Windows媒体播放器），暴风...
VB 制作网页浏览器 '如果你希望新打开的网页出现在同一个窗口，可以这样做 Dim WithEvents Web_V1 As SHDocVwCtl.WebBrowser_V1 Private Sub Form_Load() Set Web_V1 = WebBrowser1.Object WebBrowser1.Navigate2 ...
VB:设定 MsgBox 在若干时间之后若无回应则自动关闭 在我们的印象中，VB 所提供的 MsgBox 是一个强制回应的视窗，您一定要按了其中的某一个 CommandButton 之后，它才会关闭！但是在某些软体中，我们会看到，明明是使用系统的 MsgBox，可是您如果不理它，几秒钟之后，...
C#基础教程-c#实例教程，适合初学者 本章介绍C#语言的基础知识，希望具有C语言的读者能够基本掌握C#语言，并以此为基础，能够进一步学习用C#语言编写window应用程序和Web应用程序。当然仅靠一章的内容就完全掌握C#语言是不可能的，如需进一步学习C#语言...
计算机二级vb必考知识点,2016计算机二级《VB》考试重要知识点 2016计算机二级《VB》考试重要知识点2016年9月计算机二级考试时间为24日-27日，下面百分网小编为大家搜索整理了关于计算机二级《VB》考试重要知识点，欢迎参考学习，希望对大家有所帮助!想了解更多相关信息请持续...
JAVA上百实例源码以及开源项目 Java zip压缩包查看程序，应用弹出文件选择框，选择ZIP格式的压缩文件，可以像Winrar软件一样查看压缩文件内部的文件及文件夹，源码截图如上所示。 Java 数字签名、数字证书生成源码 2个目标文件 摘要:JAVA源码,...
Windows GUI程序自动化之pywinauto 一. pywinauto知识点总结 官方英文版文档网址:https://pywinauto.readthedocs.io/en/latest/index.html 1.1pywinauto的安装与配置 <1>相关库文件的下载地址 pywinauto最新版本下载地址： ... pywi...
Edraw Office Viewer component教程（一）：将Microsoft Word嵌入VB.NET并使之自动化 Edraw office viewer component对于开发人员来说是一个将Microsoft Word文档嵌入到vb.net应用程序中的简单可靠的解决方案。 在VB.Net应用程序中嵌入word文档的最佳方法是什么？相信大多数人都记得OLE技术，...
VB常用控件介绍 目录 1、窗体（Form） 2、Label(标签)控件 3、TextBox（文本框）控件 4、RichTextBox控件 5、NumericUpDown控件 6、Button（按钮）控件 7、GroupBox（分组框）控件 ...11、ComboBox（组合框）控...
