input輸入值時為什麼為報錯呢?

Question

http://fairbanks.kijiji.com/c-SignIn?rup=SearchAd&ruq=CatId%3D100115
=====================================
在這網址，頁面使用以下代碼輸入input 值
報錯 Method value not supported by automation object
為什麼呢>?
var
  Edits: OleVariant;
begin
      Edits := www.OleObject.Document.all.Item('GreetingName', 0);
      Edits.Value:='QQ';

Answer 1

定義錯了
var
  Edits: ihtmlinputelement;
begin
      Edits := www.OleObject.Document.all.Item('GreetingName', 0);
      Edits.Value:='QQ';
如果www是你的webbrowser的話不用定義什麼東西一句begin
   www.oleobject.document.all.item('greetingname').value :='qq';//完事
end;

Answer 2

我的 www是 Twebbrowser
www.oleobject.document.all.item('greetingname').value :='qq';//
用了這句，仍然是報出一樣的錯呀
=====<a name="GreetingName"></a>
<div>  
<input type="text" name="GreetingName" value="" Maxlength="128"   VCARD_NAME="Email" size="25" /> 
</div>

Answer 3

已幫你測試通過,因為上面有個相同的GreetingName,所以它的項目不是0而是1了WB.OleObject.DOCUMENT.ALL.item('GreetingName',1).value :='dsafdsaf';