Indetectables

Hola a todos , aqui les dejo un simple modulo para que lo implementen en sus aplicaciones, es una simple funcion para mutex.

Codigo:
Su modo de uso es asi:
Espero que les guste

Saludos

genial bro! ya veo que te estas animando a postear modulos! te estan quedando muy bien

gracias amigo, me sirve de muuucho..!!!

BlackZeroX escribió:link de respuesta donde dejo un código optimizado por mi parte: viewtopic.php?f=14&t=16776&start=0

Aquí dejo la función mas corta posible (El autor original no es DARK_J4V13R ya que lo que puso el esta en la APiGuide mas abajo esta el link solo lo transformo en función y quito la constante ademas que ReleaseMutex no hace lo que el dice si no mas bien LIBERA el Handle de un uso actual ¬¬!, en otras palabras no es el autor original)

y aquí las pruebas!¡.

Código: Seleccionar todo

http://allapi.mentalis.org/apilist/CreateMutex.shtml#

Pagina donde se expresa el codigo

http://allapi.mentalis.org/apilist/C5632AFDFAE653D3E4B960A3CD1C380C.html

P.D.: Citen las fuentes o los van a quemar ¬¬", y es difícil volver a creer que el source es del que a posteado!¡ e visto variados source así en este foro ¬¬#. Mejor acomoden bien esos creditos y en segundo lugar a ustedes como Mod's del código principal o mejor dicho no afirmen que son los creadores legitimos

DARK_J4V13R escribió:Hola a todos , aqui les dejo un simple modulo para que lo implementen en sus aplicaciones, es una simple funcion para mutex.

Codigo:

Código: Seleccionar todo

Option Explicit

'*****************************************************
'*****************************************************
'** Name    : mMutex                                **
'** Version : 1.0                                   **
'** Author  : DARK_J4V13R                           **
'** Date    : 25/12/09 <12:46 a.m.>                 **
'** Email   : [email protected]               **
'** Web     : www.Indetectables.net                 **
'*****************************************************
'*****************************************************

'*****************************************************
'**          Las Api para crear el Mutex            **
'*****************************************************

Private Declare Function CreateMutex Lib "kernel32" Alias "CreateMutexA" (lpMutexAttributes As Any, ByVal bInitialOwner As Long, ByVal lpName As String) As Long
Private Declare Function ReleaseMutex Lib "kernel32" (ByVal hMutex As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

Public Function Mutex(Code As String) As Boolean

    Dim Ret As String
    
    Ret = CreateMutex(0&, 1, Code) '<<< Creamos el Mutex
    
    If Err.LastDllError = 183& Then '<<< Condicion para comprobar si ya estamos abiertos
    
        ReleaseMutex Ret '<<< Si es asi, cerramos el mutex
        
        CloseHandle Ret '<<< Cerramos el Handle
        
        Mutex = True '<<< Nos colocamos en true
        
    Else '<<< Si no estamos abiertos
    
        Mutex = False '<<< Colocamos la funcion en False
        
    End If '<<< Terminamos la condición
        
End Function

Su modo de uso es asi:

Código: Seleccionar todo

If Mutex("HoLA") = True Then End

Espero que les guste

Saludos

Bro como estos hay muchos, cogen y modifican un source y le ponen siempre By (ELQUESEA) y creen que los hicieron ellos por haber comentado el codigo u otra cosa... por eso es que siempre digo que es mejor poner la fuente porque sino van a acaballarlo con comentarios malos como una vez me paso a mi en elhacker.net... jaja que bueno que ya aprendi la lección y espero poder enseñarsela a los demás... tu no cojas pleito con ellos solo dejalos que luego ellos van a darse cuenta que no saben nada y que no son capaces de hacer algo por ellos mismos... Tambien estoy seguro que al 80% de los "coders" que hay por aqui yo los cojo por teamviewer y le digo que vuelvan a hacer un codigo que ya hicieron y no serian capaces de hacerlos pero bueno es lo que hay asi que hay que aguantarse...

A ver a ver...
está bien!, puedase que el no lo haya codeado pero no es pa tanta alegadera... no se hagan mala sangre que algunno de uds alguna vez lo tuvo que haber hecho, a demas cual Gloria tiene DARK_J4V13R?... solo limitense a decir "Pon la fuente y el Autor" y eviten tanta alegadera que al final no vale.

salu2!

WHITE-R00T escribió:A ver a ver...
puedase que el no lo haya codeado pero no es pa tanta alegadera...
salu2!

Haz una gran paella y luego te la robo a ver si te hace gracia...

Salu2

PD: Se que no soy el mas indicado para hablar pero bueno