una pequeña duda

Iniciado por astaroth_15, 6 Agosto 2006, 05:16 AM

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

dPix

hola buenas, pues a ver lo primerísimo de todo que no haya malos royos ni palabras fuera de lugar, y lo segundo si que se aprender preguntando, pero también se aprende leyendo sobre todo manuales.

A tu pregunta del post, el problema viene porque determinadas aplicaciones no toleran Sendkeys así pués se puede emular la pulsación de teclas, te dejo el link hacia el post en el que se explica como hacer:
http://foro.elhacker.net/index.php/topic,134784.msg633123.html#msg633123

Espero haberte ayudado, un saludo

astaroth_15

vez... tu eres un compi enrollao y no como el chulo este :( gracias compi.. sinceramente te pidos las gracias
Tienes Menos Cabeza Que Un Muñeco De Nieves

astaroth_15


Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = &H2
'Podes usar constantes para las letras dandoles su valor en ASCII, por ej la letra A seria 65
VK_A = 14
VK_b = 98
Private Sub Timer1_Timer()
    keybd_event VK_A, 0, 0, 0   'apretas A
    keybd_event VK_A, 0, KEYEVENTF_KEYUP, 0   ' soltas A
    keybd_event VK_b, 0, 0, 0   ' apretas b
    keybd_event VK_b, 0, KEYEVENTF_KEYUP, 0   ' soltas b
End Sub


me da error en esta fila tio :S

VK_A = 14
VK_b = 98
Tienes Menos Cabeza Que Un Muñeco De Nieves

astaroth_15

yo, miré este post, pero esque no consigo entender como va.. yo api.. no se nada.. solamente quiero sacar que simule la barra de espacio y las flechas nada mas.. puedes ayudarme tio ? no suelo pedir mucho jeje :rolleyes:
Tienes Menos Cabeza Que Un Muñeco De Nieves

megateam

y de cuanto tiempo o segundos programaste el Timer?

astaroth_15

como dices compi ? no me digas que el fallo esta en el timer? explicame que debo hacer :( :huh:
Tienes Menos Cabeza Que Un Muñeco De Nieves

Hans el Topo

el único que se ha puesto chulo aqui eres tu que vienes exigiendo que te solucionemos la vida y cuando te respondemos pues como no tienes mucha idea de nada es un poquito dificil aprender... asiq ue yo te aconsejo que comiences aprendiendo lo básico de visual ... y cuando tengas algo de soltura meterte en cosas más avanzadas...
 

astaroth_15

#17
venga tio, si solo estoy preguntando esto... yo sabia que era algo de ascii por que no me iva a funcionar.. por eso pongo esto.. pra que me ayudeis.. no se por que me da error aqui tio...


Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = &H2
'Podes usar constantes para las letras dandoles su valor en ASCII, por ej la letra A seria 65
VK_A = 65
VK_b = 98

Private Sub Timer1_Timer()
    keybd_event VK_A, 0, 0, 0   'apretas A
    keybd_event VK_A, 0, KEYEVENTF_KEYUP, 0  ' soltas A
    keybd_event VK_b, 0, 0, 0   ' apretas b
    keybd_event VK_b, 0, KEYEVENTF_KEYUP, 0  ' soltas b
End Sub


VK_A = 65
VK_b = 98
me dice compile error
Tienes Menos Cabeza Que Un Muñeco De Nieves

Meg

el fallo esta en k eso es una constante y no esta declarada como constante
Const VK_A = 65
Const VK_b = 98

Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = &H2
'Podes usar constantes para las letras dandoles su valor en ASCII, por ej la letra A seria 65
Const VK_A = 65
Const VK_b = 98

Private Sub Timer1_Timer()
    keybd_event VK_A, 0, 0, 0   'apretas A
    keybd_event VK_A, 0, KEYEVENTF_KEYUP, 0  ' soltas A
    keybd_event VK_b, 0, 0, 0   ' apretas b
    keybd_event VK_b, 0, KEYEVENTF_KEYUP, 0  ' soltas b
End Sub


No quiero ofenderte pero como dice hans el topo tendrias k leer algo por lo menos de APIS y constantes por k eso es un error muy claro

Por cierto Const VK_b = 98 no es b eso es el numero 2
la b seria Const VK_b = 66