如何在WebBrowser控件实现自动填表的功能? ( 积分: 100 )

L

loginfree

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-01-31

• #1

var UserName, PassWord: String;
o := WebBrowser.oleobject.document.all.item('username', 0);
o.value:=UserName;
o := WebBrowser.oleobject.document.all.item('password', 0);
o.value:=PassWord;

这样的代码,如果表单中没有"username",可能程序就会出错.大家有完善些的自动填表代码吗?希望得到大家的帮助.

 

E

e-

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-01-31

• #2

o := WebBrowser.oleobject.document.all.item('username', 0);
if o <> nil then
o.value:= username;

 

P

payer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-01-31

• #3

e- 果然经验高

 

L

loginfree

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-01

• #4

自己U&amp;P一下.

 

E

e-

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-27

• #5

function TEmbeddedWB.FillForm(FieldName: string; Value: string): Boolean;
begin
Result := EwbTools.FillForm(OleObject, FieldName, Value)
end;

 

文

文生

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-27

• #6

如何取得某一个网站 上的系统时间？给点代码，用socket也可以

 

L

loginfree

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-12-09

• #7

谢谢大家，参与者皆有分。哈。