[OverFly]

В программе выполняется следующий код


---------------------------------------------
...
var i,j:integer;
field:variant;
...
if Web.OleObject.Document.all.tags('FORM').Length = 0 then exit
else
for i := 0 to Web.OleObject.Document.forms.length -1 do
begin
field := Web.OleObject.Document.forms.Item(I);
for j := 0 to field.length -1 do
begin
try
if field.items(j).Name = name then
begin
field.items(j).Value := iValue;
end;
except
exit;
end;
end;
end;
---------------------------------------------

На строке " field.items(j).Value := iValue;" вылетает ошибка вот такого вида: "Method 'items' not supported by... ".
Вообще, програма должна автоматизировать процесс заполнения полей.
Что тут не так и как это решить, может кто знает где взять рабочий пример?