In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Problemita con Internet explorer,Tole, Ocx

Foro público de Xailer en español
Responder
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

Hola recibo un error Document No exported method
incluyo error log
este es un ejemplo del codigo source
If MsgEdit("Enter the Lic.Plate to Process MVR ", " Run MVR by LP", @mplat, "colorb.Bmp")
oki = 'y'
// msgInfo("Line # entered is "+Mline)
endif
if !empty(mplat)
isnotok := .f.
loop
else
loop
endif
enddo
// a tratar
TRY
::oOCX := TOleAuto():New( "internetexplorer.Application" )
::oOCX:Visible := .F.
::oOCX:Navigate( "https://mvdinet.txdmv.gov/cics/mvinq/menu.html?user="+ mus + "#pass="+ mup )
::oOCX:Navigate( "https://mvdinet.txdmv.gov/cics/mvinq/regs.html/" )
CATCH
MsgStop( "Need IE Browser..." )
RETURN Nil
END
WHILE ::oOCX:Busy
ProcessMessages()
END
oField := oOCX:Document:GetElementByID( "Plate_1" )
IF oField != Nil
oField:Value := mplat
//Enviamos el formulario automáticamente
sleep(40)
// JEM
oOCX:Document:Forms[0]:Submit()
while oOCX:Busy
ProcessMessages()
end
cResult := oOCX:Document:Body:InnerText
endif
// msginfo(cresult)
GraciaS aNTICIPADAS


Attached files Error.log (2.3 KB)Â
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

Jose,
imagino que el error se debe a que en una parte usas ::oOCX y en otra oOCX.
Por cierto, es imposible que ese código que has puesto funcionara en alguna
versión de Xailer tal como está.
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

Saludos tocayo, hace ya casi 1 año desde la ultima ves que conversamos, espero estes mucho mejor de salud.
este es el code que use hasta hace 2 dias que instale el 3.0.2
oIE:=TOleAuto():New( "InternetExplorer.Application" )
oIE:Visible := .T.
oIE:Invoke("Navigate","https://prod1.dot.state.tx.us/cics/mvin ... html?user="+ mus + "#pass="+ mup )
oIE:Invoke("Navigate","https://prod1.dot.state.tx.us/cics/mvinq/regs.html/")
//Esperar a la confirmación de login y carga de la página
WHILE oIE:Busy
ProcessMessages()
END
// oField := oIE:Document:GetElementByID( "Year_1" )
// IF oField != Nil
//oField:Value := mplat
oField := oIE:Document:GetElementByID( "Plate_1" )
IF oField != Nil
oField:Value := mplat
//Enviamos el formulario automáticamente
sleep(40)
// JEM
oIE:Document:Forms[0]:Submit()
while oIE:Busy
ProcessMessages()
end
// end
// sleep(100)
//En cResult tenemos la respuesta
//cResult := oIE:Document:Body:Textarea:submit
cResult := oIE:Document:Body:InnerText
//cResult := oIE:Document:Body:Innerhtml
//MsgAlert( cResult )
endif
// msginfo(cresult)
----------------------------------------------------------
me fije en un ejemplo que le brindaste a otro xailero y lo cambie mas o menos segun Yo.
en xailer 3 entro al url y todo se ve bien pero no capturo nada en el (cresult...) se queda en .f.
basicamente el proposito es entrar al url, pasar el userid y pwd, pasar el numero de placa o serie del vehiculo y recibir del servidor la informacion de registro del vehiculo
Como siempre te agradesco tu super aportacion
Gracias
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
> Saludos tocayo, hace ya casi 1 año desde la ultima ves que
> conversamos, espero estes mucho mejor de salud.
muchas gracias.
> este es el code que use hasta hace 2 dias que instale el
> 3.0.2
¿En qué lí­nea está el error?
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

en 3.0.2 con la codificcion usada en 2.3 da un error de Tole y no llega al url
por eso trate de cambiar al oOcx que mostraste y casi casi funciona,
procesa el url pero la info no es guardada en cresult
no se si me hago entender
gracias
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
si no dices dónde falla no puedo ayudarte.
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »


pues me imagino que la line de oOCX:docuent
al final hago un msginfo de la info que supuestamente recibi del servidor y esta vacio
en la imagen 1 esta el url y la info que me envia al (cresult)
imagen 2 el msginfo vacio
-----------------------------------------------------------
::oOCX:Document:Forms[0]:Submit()
while oOCX:Busy
ProcessMessages()
end
cResult := ::oOCX:Document:Body:InnerText
endif
msginfo(cresult)
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
> pues me imagino que la line de oOCX:docuent
¿en cuál de ellas?
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

cResult := ::oOCX:Document:Body:InnerText
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
añade esto antes MsgInfo( valtype( ::oocx ) )
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

me da error
TOLEAUTO:CRESULT(0)
Error WINOLE/1009 No exported method: CRESULT
Arguments: ()
(DOS Error -2147352570)
MsgInfo( valtype( ::oOCX:cResult ) )
que hice mal?
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
¿de dónde sacas ::oocx:cResult ?
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »


el url pide 2 campos de info el año y el # de licencia
al procezarlo envia el bloque de data con la info de la rgistracion, (incluyo imagen)
la misma que entiendo queda guardada en cResult
me equivoco en eso?
a proposito de que forma puedo enviar un chr(9) al campo de Yr_1 en el url para ir directo al campo de plate_1 y enviar la info entrada en el formulario
mano gracias por tu tiempo
espero entender este proceso de una vez por todas


Attached files
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
> a proposito de que forma puedo enviar un chr(9) al campo de
> Yr_1 en el url para ir directo al campo de plate_1 y enviar
> la info entrada en el formulario
No hay que enviar ningún chr(9) para cambiar de campo.
Haz el test que te he dicho en el mensaje anterior y dime el resultado.
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

perdona tocayo pero no veo que me dijiste que pruebe o que cambie para probar
grax
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
MsgInfo( valtype( ::oocx ) )
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

ok ya lo habia tratado
te incluyo el resultado
la data sale en la pantalla pero la guarda
grax

Attached files
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »


perdon quise decir que NO guARda la data que envio el servidor
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

jose Lalin
logre que la data saliera en el cResult añadiendo tiempo con el Sleep(xxxx)
antes del document submit y antes del cResult
pero no creo que sea la forma correcta de hacerlo
espero tu comentario
Gracias
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
perdona que no haya respondido antes. Mucho lí­o por aquí­.
> logre que la data saliera en el cResult añadiendo tiempo
> con el Sleep(xxxx)
Cámbialo por:
while ::oOCX:Busy
ProcessMessages()
end
El Sleep() puede que, dependiendo del tiempo de respuesta del servidor, no
funcione en todas las ocasiones.
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

jose Lalin;
con este code los resultADOS son:
TRY
::oOCX := TOleAuto():New( "internetexplorer.Application" )
::oOCX:Visible := .t.
::oOCX:Navigate( "https://mvdinet.txdmv.gov/cics/mvinq/menu.html?user="+ mus + "#pass="+ mup )
::oOCX:Navigate( "https://mvdinet.txdmv.gov/cics/mvinq/regs.html/" )
CATCH
MsgStop( "Need IE Browser..." )
RETURN Nil
END
WHILE ::oOCX:Busy
ProcessMessages()
END
oField := ::oOCX:Document:GetElementByID( "Plate_1" )
IF oField != Nil
oField:Value := mplat
//Enviamos el formulario automáticamente
while ::oOCX:Busy
ProcessMessages()
end
// sleep(4915)
// JEM
::oOCX:Document:Forms[0]:Submit()
while ::oOCX:Busy
ProcessMessages()
end
//Sleep(2904)
cResult := ::oOCX:Document:Body:InnerText
endif
MsgInfo( cResult )
------------------------------------------------------------ --
1- El cresult esta Nil y sale antes de la data del server
2- en la primera imagen del login no estan los campos que envie al url user + pwd
3- el numbero de la Placa que envio tampoco salem, , tengo que entrar manualmente (imagen 2)
imagen 3 es la data que se supone hubiese capturado en cResult
que estare haciendo mal?


Attached files
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

imagen 3

Attached files
joselalinf
Mensajes: 291
Registrado: Jue Ene 31, 2013 1:10 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por joselalinf »

jose,
enví­ame por privado el código que estás usando para probarlo aquí­ cuando
tenga un rato libre.
Saludos,
José Lalí­n
magjem
Mensajes: 36
Registrado: Jue Abr 18, 2013 4:12 pm

Problemita con Internet explorer,Tole, Ocx

Mensaje por magjem »

dice que no estas recibiendo mensajes
mandame un mail a magjemo@gmail.com
y te lo nvio si no hay otra forma
Responder