procedure TForm1.Button2Click(Sender: TObject);
var
o:Olevariant;
begin
o := WebBrowser1.OleObject.document.all.item('articletitle',0);
o.value := 'test';
o := WebBrowser1.Oleobject.document.all.item('articlecontent',0);
o.value := 'test:)';
o :=WebBrowser1.oleobject.document.all.item('submit',0);
o.click;就是一个页面。我利用这个进行自动提交POST
如果NAME=SUBMIT 上面就没问题了。但是如果表单的SUBMIT没有名字怎么来提交?比如
<input onclick="return clckcntr();" type=submit value="发 表" style="height:20px;background-color:#f3f3f3;border:1 solid black" onMouseOver ="this.style.backgroundColor='#FFC864'" onMouseOut ="this.style.backgroundColor='#f3f3f3'">他上面没有NAME。我怎么来提交呢。谢谢:)