Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: coguepard en 31 Julio 2009, 20:05 pm



Título: VB 6.0 --> Crear un pequeño bot
Publicado por: coguepard en 31 Julio 2009, 20:05 pm
Hola a todos los expertos de VB, tengo instalado VB 6.0 me he leido un manual, pero claro mi cabeza no es capaz de entender nada porque tanta jerarquia y tantas cosas. Mi intencion es crear un pequeño bot y de alli ir avanzando, pero me gustaria crearlo yo.

Objetivos:

Quiero crear un bot muy simple. Seria ejecutar el Proyecto1.exe i que se abriera una pequeña ventana con un boton enmedio el qual en caption he puesto "OK". Una vez echo esto abro otra funcion (de sendkey), llamada Procedimiento1 donde este se encargue de presionar "ctrl" i "a" a la vez. Eso es  lo que yo con mis pocos conocimientos he intentado acer i no se si lo he conseguido. Pero claro mi intencion seria añadir una funcion que seria la ejecucion de un software, i que entonces que el sendkey se funcionara ahi.

He ojeado unos post que decian sobre enviar el sendkey a una ventana no a un programa i acer asi poder trabajar con otras aplicaciones i dejar este bot en la ventana.

PD: Yo he intentado cambiar por codigo el titulo del boton i de la ventana de mi programa que dice Form1 poniendo " caption = Ok" pero no cambia, sino cuando le doy al boton ok cambia por ello he querido ponerlo en el load_form pero nada.

Os adjunto el codigo se que estara mal por todos  lados pero algo de comprension porfavor:
Citar
Private Sub Ok_Click()
Procedimiento1
End Sub
Private Sub Procedimiento1()
Execute "C:\Program Files\Carpeta del Programa\Programa.exe"  'Con esto no se que puedo acer, i aun asi me da error
Dim Procedimiento1 As Object
Procedimiento1.Enabled
Procedimiento1.SendKeystroke ("^(a)" = True)
End Sub


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: h0oke en 31 Julio 2009, 20:10 pm
Veamos si entendi.

Quieres que al presionar sobre OK,

1) Se abra tu juego
2) Comience a enviar "ctrl - i" con cierta frecuencia?(Parecido a un autoclick)


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: coguepard en 31 Julio 2009, 20:11 pm
Exactamente, cada ceirto tiempo o continuamente. Esto seria lo esencial despues me gustaria ir avanzando i acer otras cosas

PD: "ctrl"  i   "a"


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: h0oke en 31 Julio 2009, 20:17 pm
Mira te voy a orientar un poco:

http://msdn.microsoft.com/en-us/library/ms646309%28VS.85%29.aspx

Y como me recomendó seba una vez:

http://foro.elhacker.net/programacion_vb/borrador_de_autoruninf_xd_copia_del_programa_de_carlitosdll-t234152.0.html

Espero que te sirva

Un saludo!


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: h0oke en 31 Julio 2009, 20:26 pm
Aqui más info:

Activex y ejemplo para crear hotkeys en visual basic

http://www.recursosvisualbasic.com.ar/htm/ocx-componentes-activex-dll/189-ocx-hotkey.htm

Y si te sirve, los autoclicker que hicimos S0ler y yo:

http://foro.elhacker.net/programacion_vb/pulsando_teclas_con_visual_basic-t257211.0.html

EDIT: Esto no creo que sea un tema de hacking, si es tan solo eso.


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: coguepard en 31 Julio 2009, 22:14 pm
Eso esta muy bien pero yo lo que quiero es que, voy a crear un evento para que me abra ek programa o que el sendkey sea ejecutado dentro de ese programa llamemosle " programa1". Que debo acer, porfavor puedes supervisar ese codigo que he puesto

Gracias


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: h0oke en 1 Agosto 2009, 03:34 am
Código:
Procedimiento1.Enabled
:huh:

Mira, la verdad si quieres que sea tan solo un bucle de "(ctrl+i)'s", bastará con que utilices las api, y la documentación que hiciste.

Tu código sería:
Código:
Private Sub Command1_Click()
http://msdn.microsoft.com/en-us/library/bb762153%28VS.85%29.aspx
http://msdn.microsoft.com/en-us/library/ms646309%28VS.85%29.aspx
End Sub

Eso es todo.

Si lo que necesitas, es que al ejecutarse tu jueguito se active una función, tendrás que buscar sobre inyecciones de código, o dll; pero no creo que sea tu caso, ya que solo necesitas un hotkey con un timer, aunque no lo deberías necesitar gracias al ejemplo que te deje de seba.

Un saludo!


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: coguepard en 1 Agosto 2009, 04:05 am
Perdon pero yo me referia a "ctrl"        i       "a"      a la vez no ctrl + i.

Pero de todas formas gracias i me gustaria que me explicaras que significa esa direccion de microsoft porfavor.


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: h0oke en 1 Agosto 2009, 04:36 am
Citar
Perdon pero yo me referia a "ctrl"        i       "a"      a la vez no ctrl + i.
Es lo mismo...  :rolleyes:

Citar
Pero de todas formas gracias i me gustaria que me explicaras que significa esa direccion de microsoft porfavor.

Son API's, y msdn es la mejor documentación que existen sobre el entorno Windows.

Si todavía no estás familizaridado con esto, lee un poco más.

Un  saludo!


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: kamsky en 1 Agosto 2009, 13:32 pm
creo que esto iría mejor en análisis/diseño de malware o incluso en el subforo de programación de Vb..


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: h0oke en 1 Agosto 2009, 15:02 pm
El subforo de vb creo que es el correcto.

Este usuario tan solo quiere hacer un registerhotkey, y con lo mínimo, podría hacer un temporizador con un timer, no tiene nada de "malware", "hacking" o algo por el estilo, es solo manejo de API's.

Un saludo kamsky!


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: byway en 1 Agosto 2009, 18:55 pm
usa la api shellexecute para esta linea:

"C:\Program Files\Carpeta del Programa\Programa.exe"

asi : http://trixar.com/~makai/shellex.htm

y para tu autoclicker:

http://foro.elhacker.net/programacion_vb/duda_con_sendkeys-t260462.0.html

saludos.



Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: Debci en 1 Agosto 2009, 22:27 pm
Puedes ponerle un While(1) y un sleep (No recuerdo la funcioinexacata, buscalaa  :D) para que no te sature la ram ni el juego claro, hace ya mucho que no hago vb  :D

saludos


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: h0oke en 1 Agosto 2009, 22:34 pm
Código:
While(1) 

While(TRUE)

No lo veo necesario. Por otra parte, si solo tiene la llamada a una función produciría un overflow.


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: N@5h en 2 Agosto 2009, 23:24 pm
jajaja esto seria para los juegos online?? para creser mientras estas durmiendo por ejemplo?? :p


Título: Re: VB 6.0 --> Crear un pequeño bot
Publicado por: h0oke en 3 Agosto 2009, 17:59 pm
La idea es clara.

Los juegos son los principales en llamar la atención para crear hotkeys y autoclickers, en realidad esto precisamente no es un bot.