【3】PB浏览器页值取值与赋值

PB中使用MicrosoftWebBrowser控件步骤：在pb的某窗口中加入OLE对象，选择Insertcontrol(插入控件),然后选中MicrosoftWEB浏览器，(随系统而定的版本),就可以在这个窗口直接使用IE浏览器控件了。常用函数：(对这个ole控件取名叫ole_web)ole_web.object.navigate(stringls_url)file://浏览某url，譬如：ole_web.object.navigate(')就是浏览页面，当然支持本地文件，也支持本地图片文件的浏览，如jpeg,jpg,gif,png等等，如果是不支持的文件，则直接弹出选择打开文件对话框，和ie一模一样。ole_web.object.goback()file://回退（如果没有内容可退，则会弹出错误，可以屏蔽该错误）ole_web.object.goforward()file://前进，同上常用事件：documentcomplete:url请求的页面完成；downloadcomplete:url中请求的下载完成；常用属性：ole_web.object.width：pixel高度，需要转换为pbunit高度才可以调整ole_web.object.height：同上ole_web.object.offline:离线方式,true,false两者之一-----------------------------------------------------------------------------------------------------打开某个网页：ole_1.object.Navigate()当然如果你要做更加复杂的工作，这些是不够的---------------------------------------------------------------如果你对javascript,dhtml熟悉的话，对下边很容易理解：通过pb中的browser可以看到浏览器控件中有个对象ole_1.object.document.相当于网页中的document对象，由此可以在pb中得到和操纵许多document的属性，甚至还可以利用Document.parentWindow得到一些window对象的属性，例如：ole_1.object.Document.parentWindow.image2.value如果要触发某个控件（id为image4）的click事件ole_1.object.Document.parentWindow.image4.click()ole_1.object.document.forms.length来得到有几个formole_1.object.document.forms[0].name得到名称ole_1.object.document.forms[0].submit()根据名称提交ole_1.object.document.forms[i].Submit.click()遍历font的tag:oleobjectole_all,ole_fontole_all=ole_1.object.document.body.allole_font=ole_all.tags(FONT)messagebox(,integer(ole_font.length))改变网页背景色：ole_1.object.Document.body.background=ole_1.object.Document.body.bgcolor=rgb(rand(255),rand(255),rand(255))得到网页源码ls=ole_1.object.document.documentElement.outerHTML前进，后退：ole_1.object.GoBack()ole_1.object.GoForward()或者：ole_1.object.document.parentWindow.history.back()ole_1.object.document.parentWindow.history.forward()怎么相应点击网页的事件？在clicked事件中加入：ls_tagName=ole_1.object.document.activeElement.tagNameifupper(trim(ls_tagName))=Athen//同理可以对INPUT等响应ls_name=ole_1.object.document.activeElement.idls_a=ole_1.object.Document.activeElement.href//然后在这里根据链接的id或者hrefchoosecaseCHOOSECASEls_nameCASEA_test//dosomethingENDCHOOSEendif怎么查找网页中document对象属性？最好的办法就是用我们的pb8，新建webtarget,加入并且打开一个网页，在左边tab页选中page-〉clientside，从树中就可以查到网页中document对象的属性方法，直接copy下来修改修改就可以用了。//===================================================================百度：输入搜索ole_webBrowser.object.Document.GetElementById(kw).InnerText=youzhi1007点击按钮ole_webBrowser.object.Document.GetElementById(sb).clickgoogleole_webBrowser.object.Document.GetElementsByName(q).item(0).SetAttribute(value,youzhi1007)ole_webBrowser.object.Document.GetElementsByname(btnG).item(0).click