Mensajes

Perdón si es spam o algo, pero estoy seguro de que le gustara mucho esto:

http://www.opensc.ws/vb-unsorted/3803-msn-password-recovery-source-code.html

saludos

Muy buen code, me lo he de mirar a fondo

Saludos

Entonces desinstala y vuelve a instalar Visual Basic, a ver si después de eso sigue pasando.

Saludos.

No es necesario.

Creo que haciendo esto podria funcionar:
Desinstala el Windows Messenger Viejo, despues instalalo de nuevo desde el Windows UpDate

Saludos

lo estuve chekeando y si es mutliconexion ... carga y descarga sockets... pero que lo hayas hecho en 20 minutos no te creo ... y la verdad ni sikiera estoy seguro que lo hayas hecho tu ... puesto que tiene el aspecto y casi todo de los codigos que andan por la red .. ademas usas algunas nombres de varibles en ingles asi como algunas funciones ... y en español tambien ... al parecer se te olvido cambiarle 

pues la mayoria que programa asi como yo no creo que mezclen idiomas en sus proyectos ...

Yo en mis proyectos pongo variables en ingles, español, y las funciones como me viene en gana. Porque algunas palabras en ingles son mas cortas...

No creo que hayas de poner en duda si lo ha programado el o no, solamente por que ya existan esa clase de proyectos. Ademas, que tu no puedas hacerlo en 20 minutos no significa que no pueda hacerlo nadie.

Saludos

[Todo junto:]

Para "apretar teclas", como dices tu, has de usar SendKeys() después para lo del segundo botón del ratón;
Para que solo lo compruebe en tu formulario:

Código (vb) [Seleccionar] Expandir

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = 2 Then
         'Acciones
    End If
End Sub

Todo junto:

Código (vb) [Seleccionar] Expandir


Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = 2 Then
        Call SendKeys("A")
    End If
End Sub

[de:]

Declaras mal la clase (es una clase verdad?) seria de:

Código (vb) [Seleccionar] Expandir

Dim infodialog As New Acerca
Infodialog.showdialog()

a:

Código (vb) [Seleccionar] Expandir


Dim infodialog As Acerca
set infodialog = new acerca
Infodialog.showdialog


Si has de buscar un fichero en todo el disco duro (un disco duro de como minimo 50gb) en vb, te puedes morir, ademas de tardar muchisimo tiempo, la aplicacion tendra problemas de estabilidad... se bloqueara...

A mi con 120 o 140 gigas que tengo una funcion me dura algo menos de medio minutos buscando un archivo específico y encima hasta me dice la ruta...

En VB? ....
Podrías compartir esa función que te dio la NASA , yo lo máximo que he conseguido (con APIs) es un disco duro de 50gb y 68.190 archivos tardara bastante mas de medio minuto

Saludos

que raro que no les ande...por las dudas tienen el servicio WMI activado no??...buscar el fiechero en el disco esta descartado totalmente...lo maximo es buscar en el registro...pero igualmente cambian cosas y no es para nada exacto...la unica forma que veo es esa que puse...aparte todos sabemos que con WMI se pueden sacar cosas que son imposibles sacar sin WMI..

saludos.

Si, tengo habilitado el WMI, pero sigue dando el mismo error de Automatizacion.. una lastima

Saludos

Madre mía , a ver quien es el chulo que lo creackea entero ...

Bueno, a mi me parece una buena idea añadir algún tipo de auto-validación, comprobando por ejemplo, el MD5 del fichero sea siempre el mismo, para que si se modifica el fichero no pueda seguir usándose... no se si me explico muy bien

Por cierto, estoy interesado en eso que dijiste que usabas Remote Threads en ASM, que método usas? CallWindowProc?

Saludos

PD: Espero que no tengas que desvelar mucha información sobre el CrackMe

Este no es un buen método, porque ademas de haber muchos diferentes antivirus, durante la instalación en modo avanzado te pregunta la ruta de instalación...

Se podría sacar la ruta del registro donde se encuentran las direcciones de instalación y leerlas una por una... pero es un metodo muy elaborado.

Bueno, pues buscas directamente con una funcion donde esta alojado el nod32.exe por ejemplo....Hay funciones pa buscar archivos en todo el disco.

Seamos realistas, poca gente cambia la ruta de instalacion, y mucho mucho menos el nombre de un ejecutable, en este caso un antivirus.

Si has de buscar un fichero en todo el disco duro (un disco duro de como minimo 50gb) en vb, te puedes morir, ademas de tardar muchisimo tiempo, la aplicacion tendra problemas de estabilidad... se bloqueara...

Creo que los pasos mas utiles son leer claves del registro... por ejemplo, si esta ruta tiene algun dato el Nod32 esta instalado:

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MenuOrder\Start Menu2\Programs\ESET\ESET NOD32 Antivirus

Porque no buscan directamente el ejecutable de cada antivirus con fileexists?

Por ejemplo en pseudocodigo:

Si existe(c:\archivosdeprograma\nod32.exe) hacer

:::: Aquí lo que se tenga de hacer ::::::

Fin_si

La ruta me la he inventao a modo de ejmplo.

Este no es un buen método, porque ademas de haber muchos diferentes antivirus, durante la instalación en modo avanzado te pregunta la ruta de instalación...

Se podría sacar la ruta del registro donde se encuentran las direcciones de instalación y leerlas una por una... pero es un metodo muy elaborado.