elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado:


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Ayuda con keylogger
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Ayuda con keylogger  (Leído 1,931 veces)
Piterpan

Desconectado Desconectado

Mensajes: 5


Ver Perfil
Ayuda con keylogger
« en: 4 Enero 2011, 19:34 pm »

Hola a todos he seguigo alguno de los manuales aqui expuestos, y he creado mi primer keylogger. Me guarda el boton retroceso como [back], y quisiera hacer un traductor de dicho log. en un programa aparte.
hay alguna forma de hacerlo?
Me explico mi log pone esto
Código:
Hola quu[back]e tal
y quiero que el programa externo me modifique el .txt y me deje esto:
Código:
Hola que tal

Muchas gracias de antemano


En línea

Psyke1
Wiki

Desconectado Desconectado

Mensajes: 1.089



Ver Perfil WWW
Re: Ayuda con keylogger
« Respuesta #1 en: 4 Enero 2011, 19:37 pm »

Supongo que en vez de poner:
Código
  1. VariableString = VariableString & "[back]"

Deberías poner:
Código
  1. VariableString = Left$(VariableString, Len(VariableString) - 1)

Lee manuales ;)

DoEvents! :P


En línea

Piterpan

Desconectado Desconectado

Mensajes: 5


Ver Perfil
Re: Ayuda con keylogger
« Respuesta #2 en: 4 Enero 2011, 19:39 pm »

Supongo que en vez de poner:
Código
  1. VariableString = VariableString & "[back]"

Deberías poner:
Código
  1. VariableString = Left$(VariableString, Len(VariableString) - 1)

Lee manuales ;)

DoEvents! :P
Es que lo que quiero hacer es un programa externo.
en este programa lo que hago es cargar el .txt en un textbox y quiero crear un boton que haga la funcion replace pero creando dicho retroceso. no se si me explico bien. de esta manera que me indicas en el 2º programa crearia un retroceso al final del log y no donde se encuentre [back]
« Última modificación: 4 Enero 2011, 19:43 pm por Piterpan » En línea

raul338


Desconectado Desconectado

Mensajes: 2.633


La sonrisa es la mejor forma de afrontar las cosas


Ver Perfil WWW
Re: Ayuda con keylogger
« Respuesta #3 en: 4 Enero 2011, 20:02 pm »

Entonces vas leyendo el archivo, has constantes.... busca con Instr (o la alternativa :xD) "[back]" y ahi haces un Mid$(string, 1, index) & Mid$(string, index + len(constante) + 1) y asi lo "limpias" :P
En línea

Piterpan

Desconectado Desconectado

Mensajes: 5


Ver Perfil
Re: Ayuda con keylogger
« Respuesta #4 en: 4 Enero 2011, 20:56 pm »

Entonces vas leyendo el archivo, has constantes.... busca con Instr (o la alternativa :xD) "[back]" y ahi haces un Mid$(string, 1, index) & Mid$(string, index + len(constante) + 1) y asi lo "limpias" :P
TxtEdit.SelText = Mid$(string1, 1, Index) & Mid$(string1, Index + Len(constante) + 1)
haciendo eso solo me borra el [back] pero no me genera un retroceso.
que hago mal?
En línea

raul338


Desconectado Desconectado

Mensajes: 2.633


La sonrisa es la mejor forma de afrontar las cosas


Ver Perfil WWW
Re: Ayuda con keylogger
« Respuesta #5 en: 4 Enero 2011, 21:00 pm »

Cierto, se me olvido poner un -1 al primer Mid$

Código
  1. i = 0
  2. while i <> -1
  3.    index = InStr(i, klog, "[back]")
  4.    if index <> -1 Then
  5.       Mid$(klog, 1, index - 1)
  6.       Mid$(klog, index + len("[back]") + 1) ' "[back]" seria una constante :P
  7.    End If
  8. wend
  9.  
« Última modificación: 4 Enero 2011, 21:03 pm por raul338 » En línea

Piterpan

Desconectado Desconectado

Mensajes: 5


Ver Perfil
Re: Ayuda con keylogger
« Respuesta #6 en: 4 Enero 2011, 21:20 pm »

muchas gracias por la ayuda raul
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Keylogger en VB ayuda
Programación Visual Basic
Za3LoT 8 3,285 Último mensaje 8 Julio 2008, 05:38 am
por kabruxis
Ayuda kon Keylogger « 1 2 »
Programación Visual Basic
cherembo 18 5,742 Último mensaje 6 Octubre 2006, 15:57 pm
por cherembo
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines