Ayuda fusionando los siguientes codigos. Topic is solved

Esta sección es para preguntas sobre programación/scripting usando AutoHotkey.

Moderator: Flipeador

Tebaan
Posts: 5
Joined: 16 Jun 2022, 07:19
Contact:

Ayuda fusionando los siguientes codigos.  Topic is solved

16 Jun 2022, 07:48

Hola comunidad, espero una buen recibimiento en mi primer post (soy nuevo en esto de AHK :( ).
Tengo los siguientes script separados, uno esta configurado para que con la tecla F1 abra Google Chrome en una determinada pagina (facebook) y tengo otro script configurado con la tecla F4 para que ingrese mi usuario y clave de acceso.
Mi duda es la siguiente..... se pueden "fusionar" ambos códigos para dejar todo en un mismo script ?. PD= encontré estos script indagando por internet y los adapte con lo que necesito. De antemano, muchas gracias comunidad.

PRIMER SCRIPT DE ACCESO A URL

F1::Run "https://www.facebook.com"

SEGUNDO SCRIPT DE INGRESO DE CREDENCIALES

Code: Select all

Datos := {		  "Titulo Ventana 1"		:		["[email protected]", "miclave@321"]
						, "Facebook"				:		["[email protected]", "miclave@321"]
						, "Bloc de notas"			:		["UsuarioX", "ContraseñaX"]		}

F4::
WinGetTitle, ATitulo, A
for Titulo, Dato in Datos {
	if (InStr(ATitulo, Titulo)) {
		SendRaw % Dato[1]
		Sleep 250
		SendInput {TAB}
		Sleep 250
		SendRaw % Dato[2]
		break
	}
}
return
sofista
Posts: 650
Joined: 24 Feb 2020, 13:59
Location: Buenos Aires

Re: Ayuda fusionando los siguientes codigos.

16 Jun 2022, 14:08

Hola, bienvenido :wave:

Probá:

Code: Select all

F4::
RunWait, "https://www.facebook.com"
WinGetTitle, ATitulo, A
; etc
Tema al margen: no me parece una buena idea que expongas contraseñas en un script.
Tebaan
Posts: 5
Joined: 16 Jun 2022, 07:19
Contact:

Re: Ayuda fusionando los siguientes codigos.

16 Jun 2022, 14:51

@sofista muchas gracias por tu respuesta.
Te comento, el Script lo estoy realizando a modo de prueba con el acceso a Facebook, pero realmente es para optimizar el acceso a una URL que utilizamos en mi trabajo y son credenciales genéricas (utilizan todos las mismas credenciales).
Intente probar el código que me adjuntaste, funciona, pero ahora no me funciona el resto del código :(.
Te adjunto el código completo adjuntado el que me facilitaste. Por favor te pido ayuda para ver si lo coloque en una lineal errónea o simplemente no se puede o me falta algo mas.
De antemano, muchas gracias por tu respuesta y por tu tiempo.

Code: Select all

Datos := {		  "Titulo Ventana 1"		:		["[email protected]", "miclave@321"]
						, "SSMS"				:		["[email protected]", "miclave@321"]
						, "Bloc de notas"			:		["UsuarioX", "ContraseñaX"]		}

F4::
RunWait, "https://www.facebook.com"
WinGetTitle, ATitulo, A
for Titulo, Dato in Datos {
	if (InStr(ATitulo, Titulo)) {
		SendRaw % Dato[1]
		Sleep 250
		SendInput {TAB}
		Sleep 250
		SendRaw % Dato[2]
		break
	}
}
Etiqueta:
SendInput {ENTER}
; ...
return
sofista
Posts: 650
Joined: 24 Feb 2020, 13:59
Location: Buenos Aires

Re: Ayuda fusionando los siguientes codigos.

16 Jun 2022, 15:44

Noto un par de problemas:

Primero: el hotkey F4 debe terminarse con un return y no puede incluir la declaración del label "ETIQUETA".
Segundo: El hotkey F4 no llama nunca al label "ETIQUETA". Podías llamarlo con gosub, "ETIQUETA".

Return to “Pedir Ayuda”

Who is online

Users browsing this forum: No registered users and 19 guests