comando sendkey ayuda!!??

[N@5h]

hola gente yo quiro q mi prograta quede minimizado..

pero q tire cada 1 min mas o menso como si presionaria el teclado po ejemplo
"nash"

y a los 2 min mas

"el mejor"

algo asi pq es para molestar a unos amigos..

yo lo q se asta ahroa es q tengo q tener esto:

al timer lo tengo q dejar en true i con interval de 1000??

Private Sub Timer1_Timer()
sendkey = "nash"
End Sub

como ago para q no se vea lo puedo poner el from en oculto i listo?? y me va a tirar eso cuadno este usando el word..??

en mi pc lo probe asi i no funciona q me falto??

saludos..

[BlackZeroX]

leete un manual de Basic

[cassiani]

al timer lo tengo q dejar en true i con interval de 1000??

Private Sub Timer1_Timer()
sendkey = "nash"
End Sub

como hago para q no se vea lo puedo poner el from en oculto i listo?? y me va a tirar eso cuadno este usando el word..??

Hola N@5h !

- 1.

Código [Seleccionar] Expandir

sendkey = "nash"
sin el "=".
- 2. 1000 es equivalente a 1 segundo, haste una idea.
- 3. debes sacar el handle de la ventana, la buscas le das foco y le envias la cadena.

[N@5h]

gracias cassini por tu ayuda...

lo que tengo es esto

Código [Seleccionar] Expandir

Private Sub Command1_Click()
Timer1 = True
End Sub

Private Sub Command2_Click()
Timer1 = False
End Sub

Private Sub Timer1_Timer()
sendkey.Text = "nash"
End Sub

al timer lo puse en intervanl:30000 pero para probar yo lo puse en 5000

y me tira un errro..

o sea lo q veo q no envia las pulasasiones de teclas.. o no sabe a donde enviarlas...verdad?? ese es mi error??

saludos...

[seba123neo]

el error es que asi no se usa el sendkeys, y si queres mandar pulsaciones usa api's...

saludos.

[N@5h]

gracias.. pero encontre un programita q hace lo q queria..

salduos comapñeros.. igual voy a ver como lo ago yo pero con mas tiempo...