怎么点这个button(100分)

  • 主题发起人 主题发起人 kocus
  • 开始时间 开始时间
K

kocus

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
var doc :IHTMLDocument2;
chk:ihtmlinputelement;
begin
doc:=webbrowser1.Document as IHTMLDocument2;
chk:=doc.all.item('username',0) as ihtmlinputelement;
chk.value:='hao';
chk:=doc.all.item('password',0) as ihtmlinputelement;
chk:=doc.all.item('password',0) as ihtmlinputelement;
chk.value:='669';
chk:=doc.all.item('submit',0) as ihtmlinputelement;
最后的chk是一个button。怎么点他。谢谢
end;
 
有人知道吗?谢谢
 
最好说明你的功能 以及问题所在
 
就是做个自动登陆的功能啊
 
后退
顶部