哪位大侠能帮我在http://www.114online.com/html/search/class/b01.html填写“北京”、“东城区”并选上“卫生部”？

Question

用webbrowser控件怎么填？请教！

Answer 1

hhjjhjhj(大头)大侠在吗？
其他大侠也请出现啊！请教请教！

Answer 2

哈哈，有碰到你了这个“搜 索”可以点了阿，click吧上次那个是图片，不知道该怎么click，难道只能form submit?还有复选框也不知道怎么点学习一下，帮你顶

Answer 3

不行啊，这是我的代码：Private Sub Command1_Click()
Unload Me
End
End SubPrivate Sub Form_Load()WebBrowser1.Navigate2 "http://www.114online.com/html/search/class/b01.html"
 
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
If URL = "http://www.114online.com/html/search/class/b01.html" Then
   WebBrowser1.Document.All.Item("areaid")(1).Selected =true
   WebBrowser1.Document.All.Item("tselected")(2).Checked = True
   WebBrowser1.Document.Forms(0).submit
End If
End Sub

Answer 4

给你个连接看一下先
http://www.microsoft.com/china/msdn/workshop/scrape.asp
利用 Microsoft 的 HTML 分析器来获得 Web 站点的数据

Answer 5

大侠yunfeng007(一水寒)您真好人啊，但我也是从那篇文章得到些许启发的，才写成上面的代码。那个网址有个麻烦是，他有两个选择框，第一个是选择全国的各个省市的（如北京，上海，广东等），第二个选择框是选择第一个选择框的省市下的城市/区，如当第一个选择框选择“北京”时，第二个选择框的内容是“东城区”，“西城区”，“海淀区”等等，如果第一个选择框选择“广东省”，则第二个选择框的内容是“广州”，“深圳”，“珠海”等等。问题是，我用上面我的代码去填写那两个选择框时，第一个没有问题，可以填写“北京”，“广东”等内容，但第二个就怎么都不行，好像第二个选择框是响应第一个选择框的而自动填写的，比如手工选择第一个选择框的内容为“北京”时，第二个选择框自动就有“东城区”，“西城区”，“海淀区”等内容。不知如何才能用vb代码达到目的。请教请教！

Answer 6

你要先触发onchange事件才行啊
改为
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    If Not (pDisp Is WebBrowser1.Object) Then Exit Sub
    On Error Resume Next
    
    WebBrowser1.Document.All.Item("tselected")(2).Checked = True
    WebBrowser1.Document.All.Item("areapid")(1).Selected = True
    WebBrowser1.Document.All.Item("areapid").onchange
    WebBrowser1.Document.All.Item("areaid")(1).Selected = True
End Sub