自动填表的实现，请大家给点思路！

Question

想做一个自动填表的小工具，例如在注册邮箱时都是填一些类似的内容，我事先设置相应的选项的值，当打开注册页面后，只要按一下按钮，相应的内容就可以添加进去了。或者是通过拖放来一项项的添加。
     1。如果是自动全部添加，那程序如何识别哪儿该填用户名，哪儿该填密码呢？是如何识别的？
     2。如果是拖放添加，那IE如何响应呢？

Answer 1

我做过类似的程序,很简单，获得IHTMLDocument接口，doc.all.item("text1").value="fasdf";
类似的方法，和javascript中给textbox赋值一个道理，至于IHTMLDocument接口的
获得可以写个Automation Server，在IE里加个菜单调用,也可以枚举IE窗口
细节问题可以参考www.euromind.com/iedelphi

Answer 2

实现代码procedure TForm1.Button2Click(Sender: TObject);
var
doc:IHTMLDocument2;
all:IHTMLElementCollection;
item:olevariant;
begin
  doc:=WebBrowser1.Document as IHTMLDocument2;
  all:=doc.all;
  item:=all.tags('INPUT');
  item.item(0).innerText:='syn123';
  item.item(1).innerText:='200'; 
  item.item(2).innerText:='300';
end;