Webbrowser 動態操作select元素值

Webbrowser 動態操作 select 元素值 

在自動填寫表單元素時，常常會遇到select 無option 的情況，這就需求webbrowser 自動添加option

方法有二

其一是用ole 對象

var
  myitem:Olevariant;
  Op:OleVariant;// 對應option 元素
begin
  myitem:=WebBrowser1.document;
  op:=myitem.createElement('option');
  op.setAttribute('value','xxx');
  op.innerHTML:='可顯示標題';
  myitem.getElementById('SelectId').appendChild(op);

end;




其二是用js腳本


  jsStr:='var obj = document.getElementById("SelectId");';
  jsStr:=jsStr+'obj.options.add(new Option("'+'標題'+'","'+'值'+'"));';
 //

  try
    (aWebBrowser.Document as IHTMLDocument2).parentWindow.execScript(jsStr,'javascript');
  except
  end;

調用完後，就可用

myitem.getElementById(SelectId).value:='你硬性賦的值';

編後：相信做自動註冊的網友們一定會遇到過這樣的問題，這樣就可以跳過select 的點擊事件，自動賦值了。