总结:
var
doc,all,item,ObjectXXX:OleVariant;
i:integer;
begin
doc:=browserPubInfor.Document;
all:=doc.all;
item:=all.tags('OBJECT');
for i:=0 to item.length-1 do
begin
ObjectXXX:=item.item(i);
if String(ObjectXXX.id)='你要访问的ObjectID' then
break;
end;
ObjectXXX.Metho1;
...
end;
