completar un formulario de internet con VB

Iniciado por Cuasar, 16 Febrero 2006, 16:41 PM

0 Miembros y 1 Visitante están viendo este tema.

Cuasar

Hola gente tengo una consulta. en mi trabajo tenemos algunas tareas un poco monotonas.
por ejemplo la de llenar un formulario via internet para comprobar el estado de esta pagina
mi pregunta es...
puedo hacer alguna aplicacion en VB para que cada X tiempo ingrese a esta url llene los campos y me ejecute el internet explorer con la url para ver el resultado?

me interesaria mucho hacer esto ya que me restaria mucho tiempo perdido. y tambien si se puede hacer un download de un archivo de texto ya que sacamos unos reportes con este log que bajamos de esta web.

les agradeceria mucho su ayuda.
salu2

krispin

Buenas!! es bien sencillo.
Espero que el siguiente ejemplo te valga:
http://www.p4n0r4mix.tk
en el apartado visual basic,
el fichero:
Ejemplo Automatizar Formularios WEB.rar

Saludox.

Cuasar

bueno les comento.

uno de los codigos que vi en esa url es casi lo que yo bueco ahora por mas que yo le cambio en el codigo los nombres de los campos de texto a los que quiero asignarle algun valo en la wev que yo pretendo hacerlo no funca. sera porque esta encha con un script de java?

miren les paso la url de la web aver si pueden ayudarme
https://www.empresas.hsbc.com.ar/ModAdmin/Seguridad/loginUsuarios.asp

en esta yo tengo que poner en el campo clui algun numero de cuil valido, en usuario cualquier texto y en contraseña cualquier texto y darle a aceptar. me tira una respuesta de login incorrecto y eso me dice que todo esta bien

este es es proceso que quiero automatisar con esta apli.

espero puedan ayudarme
salu2

Cuasar

gente ya lo logre ya pude asignarle a los campos el texto que yo quiero ahora lo unico que me faltaria es poder llamar al vinculo "Aceptar" podran ayudarme con eso.
cual seria el codigo para hacerlo p simplemente generar una llamada al boton enter del teclado y ya con estaria casi listo
salu2

maxnet

holas


webbrowser.document.forms("frmlogin").submit




Cuasar

maxnet te agradezco muchisimo no podia lograr que funcione
y con lo que me pasaste ya ficiona.

una ultima pregunta

no se si entraste a la web pero si lo haces veras que poniendo tu cuil (uno existente) y cualquier cosa en usuario y contraseña te llava a una web con un error que dice "el login es incorrecto"

lo unico que me faltaria es hacer que verifique ele texto y de decir eso que genere un log con el dia, la hora y si dice login incorrecto un ok

si dice cualquier otra cosa un que ponga fail o algo asi

las asignaciones no eso puedo hacerlo,
pero no se como comprobar ese texto y generar un log

te agradecería enormemente que me ayudaras con eso.
salu2

maxnet

para leer el texto de una página web utiliza esta propiedad


webbrowser.document.body.outerText


con la función instr buscas el texto "el login es incorrecto"


saludos



Cuasar

muchas gracias maxnet me ayudaste mucho de verdad.

ahora una consulta mas, yo cargo esos redultados en un log, con este codigo.


CitarPrivate Sub Command1_Click()
    On Error Resume Next
    Kill "c:/nuevo.log"
    Open "c:/nuevo.log" For Output As #1
    Print #1, Date + Time; valor
    Close #1
End Sub

pero este borra el texto que tiene el mismo para pegarle el nuevo, y yo quiero que en la linea siguiente me pege el nuevo log, me explico? yo quisiera que quede...


Citar
    date           time                    resultado
20/02/2006  23:17:35                  Ok
20/02/2006  23:35:02                Error (una variable cargada con el error)


y asi que me genere el log de todos los chequeos en un solo archivo que despues sera procesado por otra aplicacion.

espero que puedas ayudarme
salu2

NYlOn

Citarpero este borra el texto que tiene el mismo para pegarle el nuevo
En el codigo estas borrando el archivo original (Kill "c:/nuevo.log"), eso lo tendrias que sacar. Y para que se agreguen los datos cambia donde dice For Output y pone For Append.-