+ -
当前位置:首页 → 问答吧 → 用webbrowser写自动填表遇到问题

用webbrowser写自动填表遇到问题

时间:2011-09-01

来源:互联网

<tr>
  <td height="22"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
  <td width="16%" height="22"><input name="checkbox" type="checkbox" onClick="changeDT()" value="1" checked>
  <span class="menu_normal">长期票价</span></td>
  <td width="11%" align="right" valign="middle"><span class="menu_normal">开始日期:</span></td>
  <td width="21%"><div id="d_StartDate" style="visibility:hidden">
  <Script>datebox("Start_Date","")</Script>
<input name="dt1" type="hidden">
  </div></td>
  <td width="10%" align="right" valign="middle"><span class="menu_normal">结束日期:</span></td>
  <td width="42%"><div id="d_EndDate" style="visibility:hidden">
<Script>datebox("End_Date","")</Script>
<input name="dt2" type="hidden">
  </div></td>
  </tr>


以上为网页内容。
现在想自动填写开始日期和结束日期。跟据GreenBrowser浏览器的自动填表单找到了名称,分别为:txt_year_Start_Date、txt_month_Start_Date、txt_day_Start_Date,txt_year_End_Date、txt_month_End_Date、txt_day_End_Date。
然后:
WebBrowser.Document.All("txt_year_Start_Date").Value = “2011”
WebBrowser.Document.All("txt_month_Start_Date").Value = “09”
WebBrowser.Document.All("txt_day_Start_Date").Value = “01”
WebBrowser.Document.All("txt_year_End_Date").Value = “2011”
WebBrowser.Document.All("txt_month_End_Date").Value = “09”
WebBrowser.Document.All("txt_day_End_Date").Value =“11”

这样可以填到表,表单数据显示也是自已定义的,但是提交表单时,就不能提交自已定义的日期,开始和结束日是期都是默认的当前日期。不知是什么原因。但后来发觉,在填表后,用鼠标点击一下这两个日期的表单,这下再提交就可以提交到自已定义的日期了。现在求个明白和解决办法。能让我提交到自定义的日期。

作者: weilams   发布时间: 2011-09-01

不准笑:提供个思路试试,行得通行不通就不知道了,因为我是菜鸟:.Value = “2011” & VbCrlf

作者: yiguangqiang88   发布时间: 2011-09-01

引用 1 楼 yiguangqiang88 的回复:
不准笑:提供个思路试试,行得通行不通就不知道了,因为我是菜鸟:.Value = “2011” &amp; VbCrlf


有想法,刚刚试过,不行。

作者: weilams   发布时间: 2011-09-01

是不是HTML code
<Script>datebox("Start_Date","")</Script>
<input name="dt1" type="hidden">

的问题呢?

作者: weilams   发布时间: 2011-09-01

热门下载

更多