Clique abaixo para nos ajudar
Conectar-se

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
9 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 9 Visitantes :: 2 Motores de busca

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Erro de compatibilidade de cores

28/3/2017, 10:59 por Clebervfp

Boa dia, estou com um problema com vfp9, se alguém poder me ajudar fico agradecido!

Tenho um …

Comentários: 0

Espessura do cursor intermitente

7/3/2017, 09:08 por Jefferson Matakas

Bom dia a todos !!

Existe uma opcao no windows que pode ser acessada atraves da 'central da …

Comentários: 0

DESENVOLVIMENTO EM REDES

4/3/2017, 18:45 por AJC

Pessoal tem ou conhece livros ou material para programação em
redes usando banco de dados nativo …

Comentários: 0

USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 4

Como preencher campos vazios

9/2/2017, 11:55 por Linghston

Pessoal boa tarde,

É o seguinte, eu preciso preencher os campos de uma coluna da tabela DBF que …

Comentários: 2

Estatísticas
Temos 7039 usuários registrados
O último usuário registrado atende pelo nome de missias

Os nossos membros postaram um total de 32 mensagens em 18 assuntos

automação do mozilla e chrome

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

automação do mozilla e chrome

Mensagem por Handerson Mildroz em 15/1/2017, 12:16

Boa tarde a todos!

Sou iniciante no VFP. Preciso de ajuda, pois tenho um código que usa o navegador Internet Explorer para preencher formulários em um site, vejam parte do código:

...............................................

oShell = Createobject("wscript.shell")
oIE = createobject( "internetexplorer.application" )
oIE.Top = 0
oIE.Left = 0
oIE.Width = 800
oIE.Height = 600
oIE.Visible = .T.

oIE.Navigate( m.Site2 )
If ThisForm.InternetExplorerBusy() = .F.
MessageBox('Erro de espera do Internet Explorer',16,ThisForm.Caption)
Return .T.
EndIf

oShell.AppActivate(oIE.Document.Title)
loFrame = oie.Document.Frames.Item(1)
loForm = loFrame.Document.forms(0)
loForm.Item(0).Value = m.Usuario1
loForm.Item(1).Value = m.Senha1
loform.Submit()
If ThisForm.InternetExplorerBusy() = .F.
MessageBox('Erro de espera do Internet Explorer')
Return .T.
EndIf

loFrame = oie.Document.Frames.Item(1)
loFrame.Document.getElementById("idNum").value = m.NoItem
loFrame.Document.getElementById("idNum").FireEvent("onchange")

..........................................................

loFrame = oie.Document.Frames.Item(1)
loFrame.Document.getElementsByTagName("img").item(4).FireEvent("onclick")

..........................................................

Entretanto agora este site não permite mais o acesso via Internet Explorer. Só permite o acesso ao site com o Mozilla ou o Chrome. Existe possibilidade de adaptar meu código para o Mozilla ou o Chrome?
Meu código precisa necessariamente interagir com os IDs e TAGs do javascript deste site. Será que é possível seguir meu código no VFP9 ou terei que abandoná-lo?
Se eu tiver que abandoná-lo, o que não gostaria, qual seria a linguagem mais apropriada para eu conseguir o meu objetivo?

Agradeço qualquer ajuda, pois já pesquisei dias e dias e não consegui nada de concreto (li teorias que não deram certo)...

Obrigado,
Um abraço a todos,

Handerson

Handerson Mildroz
Participa Pouco
Participa Pouco


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum