Enviar string para IExplorer
13/02/2006
0
Já tentei de tudo, PostMessage e afins e não consegui:
Meu problema é:
Tenho uma aplicação que chama uma página asp com dois edits nela, localizada em minha rede local... até aí OK.
O que eu preciso é após abrir esta página... colocá-la na frente da minha aplicação e inserir no primeiro edit o login e senha do usuário que está logado em meu sistema... ou seja, eu precisaria fazer:
1) abrir a página;
2) postar a string de login no edit (ao abrir a página ele já fica com o foco automatico);
3) emular um TAB;
4) postar a string de senha;
5) emular um ENTER;
O problema é que não estou conseguindo realizar esses passos... do 2º em diante !!!
Se alguém puder me ajudar... agradeço muuuuuuuuuuuito !!!!
Paulocesar1301
Posts
13/02/2006
Paulocesar1301
13/02/2006
Ipc$
var hIE:THandle; Nome: array[0..255] of Char; begin hIE := FindWindow(´IEFrame´, nil); if hIE > 0 then SendMessage(hIE, WM_GetText, 255, LParam(@Nome[0])); // pega o caption do IE end;
14/02/2006
Paulocesar1301
14/02/2006
Massuda
De qualquer forma, o jeito (que eu acho correto) de fazer seria usando um TWebBrowser (não sei como faz, mas pelo que li aqui no fórum, é possível) ou usando Indy, como discutido [url=http://forum.clubedelphi.net/viewtopic.php?t=55935]neste tópico[/url].
14/02/2006
Truck1n
ShowWindow(handle,SW_SHOWMAXIMIZED);
blz ?
como editar não sei. foi como o massuda disse!
Abraços!
14/02/2006
Paulocesar1301
Realmente não tinha pensado em usar o WebBrowser... ótima idéia... mas ainda continuo com o problema: Não consigo ´colar´ o texto no edit da página...
Consigo emular o TAB e o ENTER... mas não as letras ?
14/02/2006
Ramms
Essa página não passa as informações por variáveis na url? tipo
page.php?login=root&senha=root
algo do tipo?
14/02/2006
Rjun
Clique aqui para fazer login e interagir na Comunidade :)