Private Declare Function CreateMutex Lib "kernel32" Alias "CreateMutexA" (ByVal lpMutexAttributes As Long, ByVal bInitialOwner As Long, ByVal lpName As String) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
 
Private Const ERROR_ALREADY_EXISTS = 183&
 
Public Const AppVer = "MyApp v1.1"
Dim mutexvalue As Long
   
mutexvalue = CreateMutex(ByVal 0&, 1, AppVer)
 
If (Err.LastDllError = ERROR_ALREADY_EXISTS) Then
 CloseHandle mutexvalue
end
End If

Este code no es mio.
en la constante AppVer Pone el caption de la ventana que uses.
le agrege el "end"
(no lo testie, por lo que vi, parece funcionar)

Dejen de probar con los SMTP de hotmail, los dio de baja hace años.

Felicitaciones, yo tengo otro NOD32, el de la pagina ww.elhacker.net

tendrias que crear un servidor que admita mas de 1 connecion y dejarlo escuchand todo el dia xD.

te lo digo rapido.

VB, facil de usar pero nunca vas a hacer algo realmente "poderoso" este lenguaje no tiene fuerza y c++ es rapido pesa menos ect ect ect xD.

JAJA, ese programa salio hace "poco" en una pagina de internet, no creo que te sea muy facil comparar muuuuchos pixeles en figuras reales...
jaja bueno suerte

No me quiero imaginar cuando llegues a la parte de que el CS verifique que tu Cheating Death este funcionando con el respectivo hash xD.


Pero bueno suerte ^^

Si, es verdad, y decias que ya lo habias terminado :S

para saber cuanod esta en 0:

if label.caption = "0" then
'Evento de minimizar con el Systray.ocx
End IF

Lo que postie yo funcioanaba a la perfeccion!

se manejaba con los index de la lista =(