如题。
解决方案 »
- 紧急求助VB皮肤控件选择问题(使用过或知道这方面知识的)
- VB中能不能合并记录集?
- 接口改变的控件无法在VBA中使用?
- 用能ADO怎么得到数据库(如ACCESS)中的所有表名?
- vb数据库的有关问题,请大家救命
- 关于VB自带打包程序的问题
- ActiveX dll中的MDI子窗体不能使用Tab键切换焦点?
- 表格中添加删除单元格求教高手,老师,谢谢!!!!!!
- treeview的VB源码哪里可以搞到
- 向高手请教!一个关于VB版本的问题
- 如何实现在网页中加载一个ActiveX控件,并实现点击网页中的按钮时,打开控件中的FOEM1,然后将FORM1的值赋给网页中的元素?
- VB6中调用from2窗体 点击按钮无响应?
网页中的代码有以下这个代码:
<iframe name="TicketForm" id="TicketForm" width="950" height="565" src="TicketCheck.jsp" frameborder="0" scrolling="no"></iframe>
----------------------------------------------------------------------------
ticketcheck.jsp页面里有:<tr bordercolor="#00BF00">
<td height="27" class="style2"> 线路:</td>
<td align="left"><input name="Line" type="text" class="input_3" id="Line2" size="20" readonly="true"></td>
<td align="right" class="style2">售出:</td>
<td><input name="HasSell" type="text" class="input_3" id="HasSell" size="5" readonly="true"></td>
<td align="right" class="style2">已检:</td>
<td>
<input name="HasCheck" type="text" class="input_3" id="HasCheck" size="5" maxlength="5" readonly="true"> </td>
<td align="right" class="style2">未检:</td>
<td><input name="NotCheck" type="text" class="input_3" id="NotCheck" size="5" maxlength="5" readonly="true"></td>
<td align="right" class="style2">班车状态:</td>
<td width="122"><input name="Status" type="text" class="input_3" id="Status" size="10" maxlength="10" readonly="true"></td>
2.使用正则表达式匹配.
Debug.Print WebBrowser1.Document.getelementbyid("HasCheck").Value
End Sub
'---------------------------------------------------------------------------------------
' 过程名 : ShowValue
' 时间 : 2010-3-1 13:24
' 作者 : 杨过.网狐.cn
' 功能 : 显示IFrame内某元素的值
'---------------------------------------------------------------------------------------
'
Sub ShowValue()
MsgBox WebBrowser1.Document.frames("TicketForm").Document.getelementbyid("HasCheck").Value
End Sub
我是把你的iframe页面内容改成这样后测的
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gbk" />
<title> new document </title>
<meta name="generator" content="notepad">
<meta name="author" content="">
<meta name="keywords" content="">
<meta name="description" content="">
</head> <body>
<TABLE>
<tr bordercolor="#00BF00">
<td height="27" class="style2"> 线路: </td>
<td align="left"> <input name="Line" type="text" class="input_3" id="Line2" size="20" readonly="true"> </td>
<td align="right" class="style2">售出: </td>
<td> <input name="HasSell" type="text" class="input_3" id="HasSell" size="5" readonly="true"> </td>
<td align="right" class="style2">已检: </td>
<td>
<input name="HasCheck" type="text" class="input_3" id="HasCheck" size="5" maxlength="5" value="ok"> </td>
<td align="right" class="style2">未检: </td>
<td> <input name="NotCheck" type="text" class="input_3" id="NotCheck" size="5" maxlength="5" readonly="true"> </td>
<td align="right" class="style2">班车状态: </td>
<td width="122"> <input name="Status" type="text" class="input_3" id="Status" size="10" maxlength="10" readonly="true"> </td>
</TR>
</TABLE>
</body>
</html>