Mensajes

Si Ch3ckM4t3r creo que eso era lo que queria porque el codigo que le di siempre genera el mismo numero al abrir el programa.

Guarda el ultimo numero que genero, luego que vuelvan a abrir la aplicacion genere un numero difrente al ultimo numero que genero.

Hola esta puede ser una manera de hacerlo

Código [Seleccionar] Expandir


Option Explicit

Private Sub Command1_Click()
Dim Cadenas() As Variant
Cadenas = Array("cadena01", "cadena02")
MsgBox Cadenas(Int(Rnd() * (UBound(Cadenas) + 1)))
End Sub


Con ése programa lo que acabaremos consiguiendo eske al contacto al que spammeemos nos acabará poniendo sin admisión, porque se acabará aburriendo de tantos mensajitos....

Saludos...

Jajaja bueno espero que alguien le sirva xD.

Hola, hice este programa que bueno como su nombre lo dice "MSN Spammer" sirve para hacer spam en el MSN Messenger.

Link:
http://rapidshare.com/files/94264342/MSN_Spammer_2008.zip.html

Imagen:

mmm probe tu codigo con Google y funciono, pero lo probe con una pagina php y no funciono...

Todos los parametros se almacenan en la variable Command y alli haces lo que quieras

Mira yo habia hecho uno pero no lo encuentro lo habia hecho asi:

El servidor capturaba y lo ponia en un picturebox luego guardaba la imagen y la pasaba al cliente.

Deberias hacer una aplicacion cliente/servidor con el Winsock y pones la aplicacion cliente en todas las pc que estan en lan y el servidor pues en la pc que quieres que abra el cd rom de todas las demas.

Hola, aca te dejo uno que esta muy bueno: http://www.recursosvisualbasic.com.ar/htm/tutoriales/tutorial_visual_basic_menu.htm