用webbrower控件(windows internet control)比如网页上第一个form下,有一个表单项的name叫"asd",自动填入text1的内容(text1怎么填入数据库内容就不要我说了吧?最简单的用data控件就可以,不会的再问我,记得要加分哦^^)就可以用以下的方式递交: For i = 0 To WebBrowser1.Document.Forms(0).length - 1 If WebBrowser1.Document.Forms(0)(i).Name = "asd" Then WebBrowser1.Document.Forms(0)(i).Value = Text1 Next i然后,要递交表单用: WebBrowser1.Document.Forms(0).submit (不需要再用for了)如果是模拟摁一个键,也可以用前面for的方式,.Value换成.Click不要客气的谢我啦:),最近我也碰到这个问题刚刚学会的。 记得分数都给我就是了:)
For i = 0 To WebBrowser1.Document.Forms(0).length - 1
If WebBrowser1.Document.Forms(0)(i).Name = "asd" Then WebBrowser1.Document.Forms(0)(i).Value = Text1
Next i然后,要递交表单用:
WebBrowser1.Document.Forms(0).submit
(不需要再用for了)如果是模拟摁一个键,也可以用前面for的方式,.Value换成.Click不要客气的谢我啦:),最近我也碰到这个问题刚刚学会的。
记得分数都给我就是了:)