Imprimir Página - DUDA Con SendKeys

Título: DUDA Con SendKeys
Publicado por: NsTeam en 8 Julio 2009, 05:16 am

Hola a Todos

Bueno Esta Es la Duda QUe Tengo

SendKeys "{space}"

Me Tira el error "Run-time error '5': Invalid procedure call or argument"

Bueno El Pekeño Code que tengo es Este

Private Sub Command1_Click()
SendKeys "{space}"
End Sub

Lo Cual Al hAcer Clik en el Comman1 envie la Tecla Space

Pero ME MAnda El Error

--> se Que Alguna de sus Respuestas Sera QUe Ponga Lo Siguiente

SendKeys " "

Pero En Si Lo Que QUiero Es Que Se Presione La tecla SPACE

Bueno Espero Alguna Respuesta Que Me Ayude

Gracias de ANtemano =)

Título: Re: DUDA Con SendKeys
Publicado por: byway en 8 Julio 2009, 05:59 am

puedes usar el Api keybd_event en vez de SendKeys :

http://www.recursosvisualbasic.com.ar/htm/listado-api/153-keybd_event-en-ves-de-sendkeys.htm (http://www.recursosvisualbasic.com.ar/htm/listado-api/153-keybd_event-en-ves-de-sendkeys.htm)

y para la tecla espacio seria:

Código

vbKeySpace

Edit:
estuve revisando y no hay para espacio asi que se puede usar el caracter ascii de espacio que es 32 entonces con esto debe funcionar:

Código

SendKeys Chr$(vbKeySpace)

Saludos.

Título: Re: DUDA Con SendKeys
Publicado por: Enemy en 8 Julio 2009, 06:08 am

Código:

Private Sub Command1_Click()
SendKeys "{space}"
End Sub

Solo eso tienes?

no se si funcionara asi suelto yo se que es así:

Código:

Private Sub Command1_Click()
Set WSS = CreateObject("WScript.Shell")
WSS.SendKeys "Teclas"
WSS.SendKeys "Mas Teclas"
End Sub

y si lo quieres hacer sobre una aplicación:

Código:

Private Sub Command1_Click()
Set WSS = createobject("wscript.shell")
Set Variable = WSS.exec("Notepad.exe")   ' O Cualquier otra aplicación.
WSS.AppActivate Variable.ProcessID
WSS.SendKeys "Bla Bla Bla"
WSSvar.SendKeys "{ENTER}"
End Sub

Es eso lo que buscas?

SALUD.O.S

Título: Re: DUDA Con SendKeys
Publicado por: NsTeam en 8 Julio 2009, 06:11 am

Cita de: byway en 8 Julio 2009, 05:59 am

Código

vbKeySpace

Saludos.

Gracias Por La Ayuda

Era Exactamente Lo QUe Buskaba =)

Pero Quise Probarlo Con Un Juego

para que al presionar SPACE

Brincara , pero VEo QUe No ME Anda PAra Eso =(

Título: Re: DUDA Con SendKeys
Publicado por: & eDu & en 8 Julio 2009, 10:15 am

No te anda por que lo tienes en un command, y cuando apretas el programa que tienes , es decir de plano es el programa. Pon un time con el código y ves al juego.

Título: Re: DUDA Con SendKeys
Publicado por: NsTeam en 8 Julio 2009, 18:00 pm

Cita de: & eDu & en 8 Julio 2009, 10:15 am

No te anda por que lo tienes en un command, y cuando apretas el programa que tienes , es decir de plano es el programa. Pon un time con el código y ves al juego.

Puse Un Timer con un Interval de 2000

Pense que la tecla Space se presionaria Sola

Pero En El Juego NO Se Presiona

INtente Con AppActivate Y Aun ASi NAda

T.T

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: NsTeam en 8 Julio 2009, 05:16 am