请教论坛自动填写表单问题
<textarea class="autosave" name="message" id="e_textarea" prompt="post_message" tabindex="1" class="txt" style="height:300px"></textarea>
上面是网页的HTML代码,,,,,用VB怎么实现自动填写表单啊,,,
请高手指点,,,谢谢
[解决办法]
'调用编辑器它自己的方法写内容Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) Dim oDoc As HTMLDocument Set oDoc = pDisp.Document Dim oTxt As HTMLTextAreaElement Set oTxt = oDoc.getElementById("e_textarea") If oTxt Is Nothing Then Exit Sub oDoc.parentWindow.execScript "writeEditorContents(""hello world!"");"End Sub