vb.net WebBrowser页面与WinForm交互技巧
最近看到博客园入门教学文章比较流行,自己最近又偷懒比较多,没啥心得,不妨写一篇没啥深度的入门文章吧。 话说有了WebBrowser类,终于不用自己手动封装SHDocVw的AxWebBrowser这个ActiveX控件了。这个类如果仅仅作为一个和IE一模一样浏览器,那就太没意思了(还不如直接用IE呢)。那么,无论我们是想做一个“定制版IE”,还是希望利用HTML来做用户界面(指WinApp而非WebApp。许多单机软件,包括Windows的帮助支持中心,都是HTML做的),都少不了Windows Form和包含在WebBrowser中的Web页面的交互。本文将通过几个实际的例子,初步介绍一下WinForm和WebBrowser所包含的Web页面之间的交互。 下面的代码假设你已经建立了一个Windows Form,上面有一个WebBrowser名为“webBrowser”。 Study Case 1:用WinForm的Event Handler响应Web页面的事件 现在有这样一个Windows Application,它的界面上只有一个WebBrowser,显示一个本地的HTML文件作为界面。现在的问题是,所有逻辑都可以放在HTML文件里,唯独“关闭”按钮遇到了困难——通常,Web页面是没有办法直接控制浏览器的,更不用说结束这个WinForm程序了。 但是,在.Net 2.0当中,“由Windows Form响应Web页面的事件”已经成为了现实。 在.Net 2.0中,整个HTML文档以及其包含的各个HTML元素,都和一个个HtmlDocument、HtmlElement之类的.Net对象对应。因此只要找到这个“关闭”按钮对应的HtmlElement对象,为其click事件添加Event Handler即可。
<html>
<body> <inputtype="button"id="btnClose"value="关闭"/> </body> </html> 那么找出该按钮并为之添加Event Handler的代码如下:
HtmlDocumenthtmlDoc=
webBrowser.Document;
HtmlElementbtnElement=htmlDoc.All["btnClose" ]; if(btnElement!=null ) { btnElement.click+=new HtmlElementEventHandler(HtmlBtnClose_Click); } 其中HtmlBtnClose_Click是按下Web按钮时的Event Handler。 很简单吧?那么稍稍高级一点的——我们都知道一个HTML元素可能有很多各种各样的事件,而HtmlElement这个类只给出最常用、共通的几个。那么,如何响应其他事件呢?这也很简单,只需要调用HtmlElement的AttachEventHandler就可以了:
btnElement.AttachEventHandler("onclick",new
EventHandler(HtmlBtnClose_Click));
//这一句等价于上面的btnElement.click+=newHtmlElementEventHandler(HtmlBtnClose_Click); 对于其他事件,把"onclick"换成该事件的名字就可以了。例如:
formElement.AttachEventHandler("onsubmit",newEventHandler(HtmlForm_Submit));
假设有一个最简单的登录页面,输入用户名密码,点“登录”按钮即可登录。已知用户名输入框的id(或Name,下同)是username,密码输入框的id是password,“登录”按钮的id是submitbutton,那么我们只需要在webBrowser的DocumentCompleted事件中使用下面的代码即可:
HtmlElementbtnSubmit=webBrowser.Document.All["submitbutton"
];
HtmlElementtbUserid=webBrowser.Document.All["username" ]; HtmlElementtbPasswd=webBrowser.Document.All["password" ]; if(tbUserid==null||tbPasswd==null||btnSubmit==null ) return ; tbUserid.SetAttribute("value","smalldust" ); tbPasswd.SetAttribute("value","12345678" ); btnSubmit.InvokeMember("click"); 这里我们用SetAttribute来设置文本框的“value”属性,用InvokeMember来调用了按钮的“click”方法。因为不同的Html元素,其拥有的属性和方法也不尽相同,所以.Net 2.0提供了统一的HtmlElement来概括各种Html元素的同时,提供了这两个方法以调用元素特有的功能。关于各种Html元素的属性和方法一览,可以查阅MSDN的DHTML Reference。 ※关于表单的提交,的确还有另一种方法就是获取form元素而不是button,并用form元素的submit方法:
HtmlElementformLogin=webBrowser.Document.Forms["loginForm"
];
//…… formLogin.InvokeMember("submit"); 本文之所以没有推荐这种方法,是因为现在的网页,很多都在submit按钮上添加onclick事件,以对提交的内容做最基本的验证。如果直接使用form的submit方法,这些验证代码就得不到执行,有可能会引起错误。 文本查找要借助于TextRange对象的findText方法。但是,.Net里并没有这个对象。这是因为,.Net 2.0提供的HtmlDocument,HtmlWindow,HtmlElement等类,只不过是对原有mshtml这个COM组件的不完整封装,只提供了mshtml的部分功能。所以许多时候,我们仍旧要借助mshtml来实现我们需要的功能。好在这些.Net类都提供了DomDocument这个属性,使得我们很容易把.Net对象转换为COM对象使用。下面的代码演示了如何查找Web页面的文本。
publicpartialclass
SearchDemo:Form
{ //建立一个查找用的TextRange(IHTMLTxtRange接口) privateIHTMLTxtRangesearchRange=null ; public SearchDemo() { InitializeComponent(); } privatevoidbtnSearch_Click(object sender,EventArgse) { //Document的DomDocument属性,就是该对象内部的COM对象。 IHTMLDocument2document= (IHTMLDocument2)webBrowser.Document.DomDocument; stringkeyword= txtKeyword.Text.Trim(); if(keyword=="" ) return ; // IE的查找逻辑就是,如果有选区,就从当前选区开头+1字符处开始查找;没有的话就从页面最初开始查找。 //这个逻辑其实是有点不大恰当的,我们这里不用管,和IE一致即可。 if(document.selection.type.ToLower()!="none" ) { searchRange= (IHTMLTxtRange)document.selection.createRange(); searchRange.collapse(true ); searchRange.moveStart("character",1 ); } else { IHTMLBodyElementbody = (IHTMLBodyElement)document.body; searchRange= (IHTMLTxtRange)body.createTextRange(); } //如果找到了,就选取(高亮显示)该关键字;否则弹出消息。 if(searchRange.findText(keyword,1,0 )) { searchRange.select(); } else { MessageBox.Show( "已搜索到文档结尾。" ); } } } 到此为止,简单的查找就搞定了。至于替换功能,看了下一个例子,我相信你就可以触类旁通轻松搞定了。 首先想到的可能是直接修改HTML文本吧……但是,与SourceCode的高亮显示不同,我们需要并且只需要高亮页面中的文本部分。HTML标签、脚本代码等等是绝对不应该去改动的。因此我们不能把整个页面的Source Code读进来然后replace,那样有破坏HTML文件结构的可能;我们只能在能够分离出文本与其他内容(标签,脚本……)的前提下进行。 方法一:使用TextRange(IHTMLTxtRange)
publicpartialclass
HilightDemo:Form
{ //定义高亮显示效果的标签。 stringtagBefore="<spanstyle='background-color:yellow;color:black'>" ; stringtagAfter="</span>" ; //…… privatevoidbtnHilight_Click(object sender,EventArgse) { HtmlDocumenthtmlDoc= webBrowser.Document; stringkeyword= txtKeyword.Text.Trim(); if (keyword == "") return; objectoTextRange=htmlDoc.Body.InvokeMember("createTextRange" ); mshtml.IHTMLTxtRangetxtrange=oTextRangeas mshtml.IHTMLTxtRange; while(txtrange.findText(keyword,4 )) { try { txtrange.pasteHTML(tagBefore+keyword+ tagAfter); } catch {} txtrange.collapse(false ); } } }
publicpartialclass
HilightDemo:Form
{ //…… privatevoidbtnHilight_Click(object sender,EventArgse) { HTMLDocumentdocument= (HTMLDocument)webBrowser.Document.DomDocument; IHTMLDOMNodebodyNode= (IHTMLDOMNode)webBrowser.Document.Body.DomElement; stringkeyword= txtKeyword.Text.Trim(); if(keyword=="" ) return ; HilightText(document,bodyNode,keyword); } privatevoidHilightText(HTMLDocumentdocument,IHTMLDOMNodenode,string keyword) { //nodeType=3:text节点 if(node.nodeType==3 ) { stringnodeText= node.nodeValue.ToString(); //如果找到了关键字 if (nodeText.Contains(keyword)) { IHTMLDOMNodeparentNode= node.parentNode; //将关键字作为分隔符,将文本分离,并逐个添加到原text节点的父节点 string[]result=nodeText.Split(newstring []{keyword},StringSplitOptions.None); for(inti=0;i<result.Length-1;i++ ) { if(result[i]!="" ) { IHTMLDOMNodetxtNode= document.createTextNode(result[i]); parentNode.insertBefore(txtNode,node); } IHTMLDOMNodeorgNode= document.createTextNode(keyword); IHTMLDOMNodehilightedNode=(IHTMLDOMNode)document.createElement("SPAN" ); IHTMLStylestyle= ((IHTMLElement)hilightedNode).style; style.color="black" ; style.backgroundColor="yellow" ; hilightedNode.appendChild(orgNode); parentNode.insertBefore(hilightedNode,node); } if(result[result.Length-1]!="" ) { IHTMLDOMNodepostNode=document.createTextNode(result[result.Length-1 ]); parentNode.insertBefore(postNode,node); } parentNode.removeChild(node); }//EndofnodeText.Contains(keyword) } else { //如果不是text节点,则递归搜索其子节点 IHTMLDOMChildrenCollectionchildNodes=node.childNodesas IHTMLDOMChildrenCollection; foreach(IHTMLDOMNodenin childNodes) { HilightText(document,n,keyword); } } } } 上面的两段代码都是为了清晰易懂而精简得不能再简的,有很多地方很不完善。比如,没考虑到如何从高亮显示状态复原;也没有大小写匹配等等。当然,掌握了原理之后相信这些都不会太难。
<b>Hel</b>loWorld!
先不管作者出于什么目的让Hel三个字母成为粗体,总之显示在页面上的是一句“Hello World!”。在我们希望高亮页面中的“Hello”这个关键字时,如果用DOM分析的话,会得出含有“Hel”的<b>节点和文本节点“lo World!”两个节点,因此无法将其挑出来。而TextRange则能正确识别,将其设置为高亮。因此也可以说TextRange是只和文本有关,和HTML语法结构无关的对象。
function
DoAdd(a,b){
returna+ b; } 那么,我们要在WinForm调用它,只需如下代码即可:
objectoSum=webBrowser.Document.InvokeScript("DoAdd",newobject[]{1,2
});
intsum=Convert.ToInt32(oSum); 其次,如果我们想执行一段Web页面中原本没有的脚本,该怎么做呢?这次.Net的类没有提供,看来还要依靠COM了。IHTMLWindow2可以将任意的字符串作为脚本代码来执行。
stringscriptline01=@"functionShowPageInfo(){"
;
stringscriptline02=@"varnumLinks=document.links.length;" ; stringscriptline03=@"varnumForms=document.forms.length;" ; stringscriptline04=@"varnumImages=document.images.length;" ; stringscriptline05=@"varnumScripts=document.scripts.length;" ; stringscriptline06=@"alert('网页的统计结果:rn链接数:'+numLinks+" ; stringscriptline07=@"'rn表单数:'+numForms+" ; stringscriptline08=@"'rn图像数:'+numImages+" ; stringscriptline09=@"'rn脚本数:'+numScripts);}" ; stringscriptline10=@"ShowPageInfo();" ; stringstrScript=scriptline01+scriptline02+scriptline03+scriptline04+scriptline05+ scriptline06 +scriptline07+scriptline08+scriptline09+ scriptline10; IHTMLWindow2win= (IHTMLWindow2)webBrowser.Document.Window.DomWindow; win.execScript(strScript,"Javascript"); OK,今天就写到这里吧,再想起什么来再补充吧。欢迎大家多多指正,欢迎讨论。 其它备注: 如何获取引发单击(onclick)事件的网页元素?
htmldocuments=webbrowser1.document htmldocuments.GetElementById("YYYY").AttachEventHandler("onfocus",AddressOf LabelShow) htmldocuments.GetElementById("XXXX").AttachEventHandler("onfocus",AddressOf LabelShow) Private Sub LabelShow '在此处,我如何才能得到处发这个事件的元素ID,也就是YYYY或是XXXX End Sub
Private Sub LabelShow(sender As Windows.Forms.HtmlElement,e As EventArgs)
End Sub
------解决方案--------------------------------------------------------
要想获得你想要的id 那这个自定义函数的委托要正确,换句话说自定义函数跟触发条件的签名是要一致的,楼上的兄弟已经给你样板了。
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |