求网页填表中如何操作下拉框 (50分)

  • 主题发起人 主题发起人 风铃夜思雨
  • 开始时间 开始时间

风铃夜思雨

Unregistered / Unconfirmed
GUEST, unregistred user!
向webbrowser中的网页填表

文件框搞定了,就是下拉框和单选框搞不定,。谁有好的方法啊,5555。。。。各大网站都找过了,没有找到有用的,我我哭。。。。哇呜。。。

 
不会吧!
这个很简单呀!
单选:<input type=radio value=aa name=aa>aa
下拉<select name=aa><option>aa<option></select>
 
我晕啊,我是说怎么操作网页中的下拉框和单选框

就是填表填这两个啊,超晕啊,你给这个我干嘛
 


uses mshtml;
var
HtmlDoc:IHTMLDocument2;
myitem:Olevariant;
i:integer;
begin
myitem := WebBrowser1.Document;
for i := 0 to myitem.all.length - 1 do
begin
if myitem.all.item(i).tagName = 'SELECT' then // 下拉框选择
begin
myitem.all.item(i).value:='2';
end;

if myitem.all.item(i).tagName = 'INPUT' then
begin
if Uppercase(myitem.all.item(i).type)='RADIO' then
begin
if myitem.all.item(i).value='求' then myitem.all.item(i).checked:=true;
end;
end;
end;
end;
 
接受答案了.
 
拿我的程序来贴,把分给我啦
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
930
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
871
DelphiTeacher的专栏
D
后退
顶部