AutoMSN 2.0 by €duhack envía, cuenta, descontecta y bombardea por MSN!!!!...VB

[[Zero]]

Weno, os presento el AutoMSN 2.0, del que he aprendido mucho creando y creo que merece la pena bajarlo. Os hago una dscripción con las mejorar respecto de la versión anterior:

-Añadido gestor de contactos, para seleccionar el contacto al que se le realizarán las acciones, por lo que el error de la ventana de la versión anterior está solucionado.


-Función autoenvío mejorada, añadida cuenta atrás y ahora si se puede en segundos, minutos....

-Función contar: Es una especie de cuenta (progresiva o regresiva) al que se le puede añadir un mensage y que se envía cada segundo, muy bueno para dar avisos....

-Función bombardear: Envía el mensage selecionado un numero de veces de una sola tacada.

-Función desconectar: Desconecta a un contacto. Úsenlo con criterio, no abusen.

Parte de las funciones las he realizado gracias al MSN kick de |MADANTRAX| y del weon molestoso de CesarTkgo69, a los que doy mil gracias, ya que por su aportación, he aprendido mucho.

Aquí les dejo el link---> http://www.megaupload.com/?d=VTJXSUKI

Salu2

[feler]

si el messenger no esta abierto da error.

[skapunky]

Yo te querria dar un consejillo para mejorar la estetica...las etiquetas que has usado para escribir "sonido,zumbido,texto.." ponlas con el fondo transparente, ya que queda esa cuadricula negra y es un poquillo feo.

Saludos.

[[Zero]]

si, si no abres el messenger da error, no se kmo arreglarlo,xro no supone un gran problema, con tener ahí la ventanita ya
Lo del fondo, para la proxima versión lo haré, puse ese cuadrito negro xk pensé k así resaltaría alg mas,xro weno, lo haré haber k tal! 
Gracias por los comntarios,asi voy aprendiendo...
Salu2

[Lao]

Mui pero mui facil de hacer, igual mui bien por aportarlo, luego hago uno y lo posteo me diste idea !!! suerte

[[Zero]]

Ya k es tan facil podrias decirm como,estoy empezando, y si lo que haces es plagiarme mi programa sin aportar nada..... pues weno.......un gran logro por tu parte....
Saludos

[CesarTkgo69]

Compa,
yo hice un programa identico, por no decir igual...
y para evitar que me lanzara error por no tener
abierto el messenger, encontre este codigo y lo puse
en mi programa...

Código (vbnet) [Seleccionar] Expandir


Private Sub Form_Load()

Text1 = VerificarExe("msnmsgr.exe")

If Text1 = "False" Or Text1 = "Falso" Then
msgbox "Messenger Cerrado!"
End If

End Sub

Funcion verificar:

Código (vbnet) [Seleccionar] Expandir


Public Function VerificarExe(ejecutable As String) As Boolean
    Dim strSQL As String
    On Error Resume Next
    strSQL = "Select Name from Win32_Process Where Name = '" & ejecutable & "'"
    VerificarExe = GetObject("winmgmts:").ExecQuery(strSQL).Count
End Function


Como puedes ver,
al cargar el formulario (form_load), en un textbox (Text1)
se establece si se esta ejecutando el proceso o no...
segun el idioma del PC saldra True o False,
Verdadero o Falso...

Y bueno, ahi a la imaginacion po,
puedes editar el codigo para hacerlo mas eficaz,
porque igual es harto arcaico :/

Eso po Edu
Saludos desde Chile
Chauuuz
P.D: si te interesa aqui el ejecutable de mi programa.. obviamente libre de todas esas weas malas

[[Zero]]

Yo lo había solucionado con "on error resume next" pero es una cutrada, y así no soluciono para nada el error. Me gusta este código, ya que dependiendo del error puedes ejecutar un msgbox del error, es muy buena idea, miraré haber que sale d ahí, estoy empezando, y así se aprende. Muchísimas gracias por esos códigos, me servirán de mucho para la versión 2.0.Sería mucho pedir si puedes poner el código fuente del tuyo?? me encanta tu programa y creo que puedo aprender un montón si me pasas el código, aunque sea por privado, te estaría eternamente agradecido.
Salu2

[[Zero]]

Gracias por el source tio, estudiando y aprendiendo.....
Salu2

[[Zero]]

Bueno, ya llevo unas semanas trabajando en la versión 2.0, voy a añadir algunas nuevas y sorprendentes funciones, espero que sean de su agrado, pero mientras tanto, puden darme mas ideas de nuevas funciones, y si puedo las llevaré a cabo en esta versión.
Salu2