Mensajes

Bueno tenia tiempo sin conectarme puesto problemas con la red 

Lo de los "Eventos Vacios" Me ha pasado muchas veces en otros programas incluyendo este que pasa:

Por ejemplo Pongo algun objeto con alguna accion por ejemplo un Button, entonces despues veo que ese button no tiene funcion o no lo necesito realmente, y lo borro con click Suprimir, entonces el codigo de ese Button no se borra entonces eso es lo que pasa realmente con esos "huequitos" por llamarlos de alguna manera, que quedan hay.

Lo de las progressbar, La progressbar del inicio del programa si es facha eh, la verdad es que no esta cargando nada  , Eso de los Hilos no tengo la mas minima idea, Application.DoEvents() "o no lo se usar","o no me funciona", pasamos a lo otro, la progressbar tiene un Timer que la ejecuta, pero no tengo la mas minima idea de hacer que no se Tilde, incluso en otra de version de ese mismo spammer le quite la Progressbar y le puse un Do Loop, y se seguia tildando, la verdad me llamo la atencion eso de los Threadings, Hilos,Etc...

y si...

Soy muy novato en esto xD

Bueno espero que me sigan ayudando si quieren "re-programar" el codigo y subir un test de algo como el Threading "ese", sera bastante agradecido eh!!!

Código (vbnet) [Seleccionar] Expandir

TextBox1.text = "Gracias...!!!"

Skeletron la verdad es que yo no me le puse complicaciones ni nada al codigo, yo solo quise crear un spammer y Cree un Codigo basico para enviar correos, y el loop de la progressbar que hace que se envien y envien, no me puse a estar buscandole errores al gmail ni cosas de esas.

osea no se porq dejara enviar tantos, pero lo probe con 2 cuentas de Gmail 1 mia y 1 de mi tio y en la de mi tio paso los 1000 y como dije anteriormente en el mio paso los 5000 sin ningun problema.

No se que le pasara al Gmail

Si ese ya lo sabia raul  pero de todas formas gracias por el dato jeje.

ps si ese es el detalle que es para cualquier archivo

BUTTON1
If TextBox1.text = "NOMBRE DE USER" and TextBox2.text = "PASSWORD" Then
Form1.Show
Return
Me.Hide
End If
msgbox "Login Incorrecto por favor vuelva a escribir los datos"
TextBox1.Clear
TextBox2.Clear
Return
End Sub

Eso va en el boton de login o como le llames, En nombre de user pones el nombre que debe poner para entrar y password el pass ps.

Espero te sea de ayuda

bueno pues mi duda es, yo hace mucho tiempo ya cuando andaba metido mas profundo en lo del hacking, "lo deje por un tiempo" porque necesitaba socializarme mas con la gente xD

En esos tiempos yo consegui un Programa creado por un user, no estoy seguro si de este foro.

el programa lo que hacia era por ejemplo abrir un archivo "X" Example un .bat que pesaba "2kb" y en un TextBox uno escribia la cantidad a aumentar le ponias por ejemplo 2MB y le dabas a "Transformar" y este programa aumentaba el tamaño de ese fichero.
Ahora Mis dudas Son las siguientes
/alguien conoce ese programa\
/saben si se puede crear algo parecido en Vb.net\

Segun tengo entendido el programa llenaba de datos basura a el fichero y este aumentaba su tamaño.

Bueno esto es todo

espero me ayuden Gracias!

Oye Skeletron Buena data pero.

Yo deje el mio prendido todo una noche con mi correo a ver cuanto llenaba y paso los 5000 yo creo que no tiene ningun problema.

En que parte de Gmail aparece eso

Bueno es un Windows Live Messenger Fake "Falso" creado por mi, este wlm fake sirve para sacar las claves de sus contactos ya que es la copia exacta del original a diferencia que este guarda la clave y el E-Mail en un archivo de texto.

----------------------------ACTUALIZADO-------------------------------
Ahora el Registro de Pass Se guarda en "C:\Windows\msgpass.txt"

Ahora incluye imagenes en los Botones, lo ven en la imagen de abajo.
y ahora modifique un poco el GUI para que se vea un poquito mas "Clean"




Descargar

Espero les guste esta nueva Version...!!!
----------------------------ACTUALIZADO-------------------------------

Bueno NickZ es un Programa que hice en Vb.Net como en 5 Minutos y como me gusto mucho el resultado bueno pues quiero compartirlo con ustedes, espero les guste  

-------UPDATE-------
Le puse un boton de Guardar, al dar click en guardar el texto escrito se guarda en un Archivo de Texto que se crea en el escritorio.

Al dar click a los iconos naranjas se Copian al textbox1



Descargar

CODIGO

Código (vb) [Seleccionar] Expandir

Public Class Form1

   Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
       TextBox1.Paste("(·|·)")
   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       If TextBox1.Text = "" Then
           MsgBox("No se puede Generar si el cuadro esta Vacio")
           Return
       End If
       MsgBox(TextBox1.Text)
   End Sub

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       If TextBox1.Text = "" Then
           MsgBox("El cuadro esta Vacio")
           Return
       End If
       TextBox1.SelectAll()
       TextBox1.Copy()
       MsgBox("El Texto se Copio al Clipboard")
   End Sub

   Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
       TextBox1.Paste("~~")
   End Sub

   Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click
       TextBox1.Paste("/*\")
   End Sub

   Private Sub Label4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label4.Click
       TextBox1.Paste("(-_-)")
   End Sub

   Private Sub Label5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label5.Click
       TextBox1.Paste("O.o")
   End Sub

   Private Sub Label6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label6.Click
       TextBox1.Paste("^_^")
   End Sub

   Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
       If TextBox1.Text = "" Then
           MsgBox("No hay nada que Borrar")
           Return
       End If
       TextBox1.Clear()
   End Sub

   Private Sub Label7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label7.Click
       Timer1.Start()
   End Sub

   Private Sub Label8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label8.Click
       WindowState = 1
   End Sub


   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       Static i As Double = 1.0
       i -= 0.08
       Me.Opacity = i
       'si el formulario es ya invisible
       If Me.Opacity = 0 Then
           'detener el temporizador
           CType(sender, Timer).Stop()
           'cerrar el formulario
           Me.Close()
       End If
   End Sub
End Class

Si asi es Alvaro usa el SMTP De Gmail y para Autentificarte puse una Cuenta mia, porque mi idea principal era que la gente pusiera su cuenta para logearse, pero yo se que mas de uno no lo habria hecho porq pensarian que le ivan a agarrar su clave o cosas asi.

Por eso puse una mia que no uso.

Cualquier otra Duda la Respondere! 

mmm Bueno Gracias!

Ya me quedo claro