AJUDA WEBBROWSER URGENTE

KIDGORDONES 02/09/2011 06:25:56
#383154

oi amigos uso o vb 2008 express e preciso muito clicar em um link com um componente webbrowser mas nao clica de jeito nenhum pois nao tem id, preciso de uma funcao que clique procurando os links pelo nome e clique nele, o codigo html está abaixo, me ajudem pelo amor de deus.
<td class=[Ô]tdTituloMenuPai[Ô] colspan=[Ô]2[Ô]>
<a href=[Ô]#[Ô] class=[Ô]aMenuNome[Ô] onclick=[Ô]mudaClasseLink(this,1,0,0);CloseAll();ajaxProcessUrl([ô]/axmf/empresasonline91[ô], tratarResposta);return false;[Ô]>Empresa Online 91</a>

Em delphi eu faco assim e da certo,mas preciso disto em vb.
Doc2 := wb.Document as IHTMLDocument2;
elementos := doc2.links;
for i := 0 to elementos.length - 1 do
begin
elemento := elementos.item(i, 0) as IHTMLElement;
if Assigned(elemento) then

begin
if (pos([ô]Empresa Online 91[ô],elemento.outerText) > 0) then
begin
elemento.click;
Como eu faco essa funcao em vb 2008, lembrando que nao consigo colocar mshtml, flws abracos.