elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Introducción a la Factorización De Semiprimos (RSA)


  Mostrar Mensajes
Páginas: [1] 2 3
1  Programación / Programación Visual Basic / Re: Duda con MSHFlexGrid en: 27 Abril 2011, 15:42 pm
Cual es la diferencia?
2  Programación / Programación Visual Basic / Re: Duda con MSHFlexGrid en: 26 Abril 2011, 17:16 pm
Estoy eternamente agradecido de 79137913 que pudo solucionar mi tema.
Por si otro llega a tener la misma duda:

Código
  1. Private Sub Form_Load()
  2.    ' Abre la conexión
  3.    Call IniciarConexion
  4.    ' carga el Recorset con todos los datos
  5.    rs.Open "select * from Consulta1", cnn, adOpenStatic, adLockOptimistic
  6.    ' llena el flexgrid
  7.  
  8.    Call CargarFlex(flex)
  9.  
  10.    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=bd.mdb; Persist Security Info=False"
  11.    Adodc1.RecordSource = "select * from Consulta1"
  12.    Adodc1.Refresh
  13. End Sub
  14.  
  15. Private Sub Text1_Change()
  16.        rs.Close
  17.        rs.Open "SELECT * FROM Inventario WHERE Barcode LIKE '" & Text1.Text & "%" & "'", cnn, adOpenStatic, adLockOptimistic
  18.        Set flex.DataSource = rs
  19.  
  20. End Sub

Código
  1. Option Explicit
  2.  
  3. Public Declare Sub InitCommonControls Lib "Comctl32" ()
  4. Public flex As MSHFlexGrid
  5. Public cnn As New ADODB.Connection
  6. Public rs As New ADODB.Recordset
  7.  
  8.  
  9. Sub CargarFlex(flex As MSHFlexGrid)
  10.  
  11.    Set flex.DataSource = rs
  12.  
  13.    With flex
  14.  
  15.        .ColAlignmentFixed(0) = 1
  16.        .ColAlignment(0) = 1
  17.  
  18.        .ColAlignmentFixed(5) = 8
  19.        .ColAlignment(5) = 8
  20.    End With
  21. End Sub
  22.  
  23.  
  24. Public Sub IniciarConexion()
  25.  
  26.    With cnn
  27.        .CursorLocation = adUseClient
  28.        .Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=bd.mdb; Persist Security Info=False"
  29.    End With
  30.  
  31. End Sub
  32.  
  33. Sub Desconectar()
  34.    On Local Error Resume Next
  35.    rs.Close
  36.    Set rs = Nothing
  37.    cnn.Close
  38.    Set cnn = Nothing
  39. End Sub

Modificar los nombres corerspondientes a las tablas de la BD
Saludos y muchas gracias por ayudarme
3  Programación / Programación Visual Basic / Re: Duda con MSHFlexGrid en: 25 Abril 2011, 16:44 pm
Quedaria asi?

Código
  1. Call ReGrid "SELECT * FROM Inventario WHERE Barcode LIKE '" & Text1.Text & "%" & "'" , flex
4  Programación / Programación Visual Basic / Re: Duda con MSHFlexGrid en: 25 Abril 2011, 16:26 pm
Muchas gracias, ahora pruebo y comento
5  Programación / Programación Visual Basic / Duda con MSHFlexGrid en: 25 Abril 2011, 14:53 pm
Hola a todos, Bueno tengo una pregunta.
Si uso LIKE en un datagrid, funciona perfecto, ya que lo que escribo en un textbox, me lo muestra en la grilla.

El code que tengo en el datagrid es el siguiente:

Código
  1. Private Sub txtSearch_Change()
  2. sent = "SELECT * FROM stock WHERE Descripcion LIKE '" & txtSearch & "%" & "'"
  3. Adodc1.RecordSource = sent
  4. Adodc1.Refresh
  5. End Sub

Lo que quiero hacer es que esto mismo funcione en un MSHFlexGrid

Espero que puedan ayudarme.
Saludos
6  Programación / Programación Visual Basic / Re: Ayuda con codigo en VB6 en: 18 Abril 2011, 01:12 am
Muchas gracias 79137913!
Despues de pasarme toda la tarde investigando me di cuenta de algo.
Los lectores que se conectan por USB, actuan de forma automatica.
En cambio los lectores que funcionan por puerto COM, necesitan del siguiente codigo:

Código
  1. 'Barcode
  2. Private Sub txtID_KeyPress(KeyAscii As Integer)
  3.    If KeyAscii = 13 Then
  4.       txtID = MSComm1.Input 'Recoge datos desde el lector
  5.    End If
  6. End Sub

Lo que hace es facil, se coloca el foco en el txtID (textbox) y al presionar Enter lee el codigo por medio del lector y lo coloca en ese mismo textbox.
Esto lo hice con el control MSComm que es para el ingreso de datos por el puerto COM.
Lo hice antes de darme cuenta de lo del USB...

Bueno, espero que otro que tenga mi misma duda se le solucione con este post.
Saludos!
7  Programación / Programación Visual Basic / Codigo de Barras VB6[Solucionado] en: 17 Abril 2011, 20:49 pm
Hola a todos. Tengo una confusion con un codigo en VB.
Lo que necesito es un codigo de un lector de barras.
Osea que lea el codigo de barras por medio del lector y que coloque el codigo en un textbox.
Si alguien sabe como hacerlo se lo agradeceria mucho!
Saludos
8  Seguridad Informática / Criptografía / Crackeador MD5 por Fuerza bruta en: 7 Septiembre 2010, 21:27 pm
Aca les dejo este crackeador por fuerza bruta. Funciona de maravilla aunque no es muy rapido por el lenguaje. Quizas les sirva como ejemplo.

Modo de uso:

Código:
Cracker.py -t md5 -h e10adc3949ba59abbe56e057f20f883e -w 1234567890 -a 9 -i 3 -v

Comandos:

Código:
-t: Tipo de Hash
-h: Hash a Crackear
-w: Teclas a usar
-a: Maximo de Caracteres
-i: Minimo de Caracteres
-v: Modo Hacking

Código
  1. import sys , string , time
  2. def main():
  3.    "Main"
  4.    title = "MD5 Cracker Brute Force"
  5.    print "\n" + title.center(45) + "\n"
  6.  
  7. def usage():
  8.    "Usage"
  9.    print "[+] Ejemplo : Cracker.py -t md5 -h e10adc3949ba59abbe56e057f20f883e -w 1234567890 -a 9 -i 3 -v"
  10.  
  11. def usagelarge():
  12.    "Usage Large"
  13.    print "\n  Forma de Uso:"
  14.    print "\n  [+]Ejemplo: Cracker.py -t md5 -h e10adc3949ba59abbe56e057f20f883e -w 1234567890 -a 9 -i 3 -v"
  15.    print ""
  16.    print "\t[Comandos]"
  17.    print "\t   -t: Tipo de Hash"
  18.    print "\t   -h: Hash a Crackear"
  19.    print "\t   -w: Teclas a usar"
  20.    print "\t   -a: Maximo de Caracteres"
  21.    print "\t   -i: Minimo de Caracteres"
  22.    print "\t   -v: Modo Hacking\n"
  23.  
  24. def timer():
  25.    "Time"
  26.    now = time.localtime(time.time())
  27.    return time.asctime(now)
  28.  
  29. if '__main__' == __name__ :
  30.  
  31.    if len(sys.argv) <= 5:
  32.        main()
  33.        usagelarge()
  34.        sys.exit(1)
  35.  
  36.    hhash = words = maxw = minw = typeh = ""
  37.    verbose = 0
  38.  
  39.    for arg in sys.argv[1:]:
  40.        try:
  41.            if arg.lower() == "-v" or arg.lower() == "-verbose":
  42.                    verbose = 1
  43.            if arg.lower() == "-h" or arg.lower() == "-hash":
  44.                    hhash = sys.argv[int(sys.argv[1:].index(arg))+2]
  45.            if arg.lower() == "-a" or arg.lower() == "-max":
  46.                    maxw = sys.argv[int(sys.argv[1:].index(arg))+2]
  47.            if arg.lower() == "-i" or arg.lower() == "-min":
  48.                    minw = sys.argv[int(sys.argv[1:].index(arg))+2]
  49.            if arg.lower() == "-w" or arg.lower() == "-words":
  50.                    words = sys.argv[int(sys.argv[1:].index(arg))+2]
  51.            if arg.lower() == "-t" or arg.lower() == "-type":
  52.                    typeh = sys.argv[int(sys.argv[1:].index(arg))+2]
  53.        except(IndexError):
  54.            print "[+] Comandos Obligatorios -t(Tipo de Hash) -h(Hash) -w(Teclas) -a(Maximo de teclas) -a(Minimo de teclas)"
  55.            usage()
  56.            sys.exit(1)
  57.  
  58.    if minw == "" : minw = '1'
  59.  
  60.    main()
  61.    for args in (typeh, hhash, words, maxw, minw):
  62.        try:
  63.            if args != "":
  64.                if args == typeh :
  65.                    if typeh.lower() != 'md5' or 'sha':
  66.                        if typeh.lower() == "md5" :
  67.                            typeh = '1'
  68.                            print "[+] Tipo de Hash : MD5"
  69.                        elif typeh.lower() == "sha" :
  70.                            typeh = '2'
  71.                            print "[+] Tipo de Hash : SHA1"
  72.                    else:
  73.                        print "[+] Tipo Invalido de Hash"
  74.                        sys.exit(1)
  75.                if args == hhash :
  76.                    if typeh == '1' :
  77.                        if len(hhash) == 32 :
  78.                            print "[+] MD5 Hash : " + hhash
  79.                        else:
  80.                            print "[+] Tipo Invalido de Hash"
  81.                            sys.exit(1)
  82.                    if typeh == '2' :
  83.                        if len(hhash) == 40 :
  84.                            print "[+] SHA1 Hash : " + hhash
  85.                        else:
  86.                            print "[+] SHA1 Invalido"
  87.                            sys.exit(1)
  88.                if args == words :
  89.                    print "[+] Teclas a usar : " + words
  90.                if args == maxw :
  91.                    if maxw.isdigit() != False :
  92.                        if int(maxw) >= 15 :
  93.                            print "[+] Maximo de Digitos : 15 : " + maxw
  94.                            sys.exit(1)
  95.                        else:
  96.                            if int(maxw) > int(minw):
  97.                                print "[+] Maximo de Digitos : " + maxw
  98.                            else:
  99.                                print "[+] El Maximo de Digitos debe ser mayor al Minimo de Digitos"
  100.                                sys.exit(1)
  101.                    else:
  102.                        print "[+] Maximo de Teclas = Digitos"
  103.                        sys.exit(1)
  104.                if args == minw :
  105.                        if minw.isdigit() != False :
  106.                            if int(minw) < int(maxw) :
  107.                                print "[+] Minimo de Digitos : " + minw
  108.                            else:
  109.                                print "[+] El minimo de Digitos debe ser menor al maximo de Digitos"
  110.                                sys.exit(1)
  111.                        else:
  112.                            print "[+] Minimo de Teclas = Digitos"
  113.                            sys.exit(1)
  114.            else:
  115.                print "[+] Comandos Obligatorios -t(Tipo de Hash) -h(Hash) -w(Teclas) -a(Maximo de teclas) -a(Minimo de teclas)"
  116.                usage()
  117.                sys.exit(1)
  118.        except(ValueError):
  119.            print "[+] Formato de comandos erroneo"
  120.            sys.exit(1)
  121.  
  122.    f = open("CRACK.py",'w')
  123.    f.write("#!/usr/bin/env python\n")
  124.    if (typeh == '1') : f.write("import sys , md5 , string , time\n")
  125.    if (typeh == '2') : f.write("import sys , sha , string , time\n")
  126.    tab = '\t'
  127.    f.write("def timer():\n")
  128.    f.write(tab + "now = time.localtime(time.time())\n")
  129.    f.write(tab + "return time.asctime(now)\n")
  130.    f.write("def crackhash():\n")
  131.  
  132.    i = 0 ; inwords = ""
  133.    f.write(tab + "hashh = '" + hhash.lower() +"'\n")
  134.    f.write(tab + "try:\n")
  135.  
  136.    #print words
  137.    for i in words:
  138.        if i == str(words[int(len(words)-1)]) :
  139.            inwords += "'" + i + "'"
  140.            break
  141.        inwords += "'" + i + "',"
  142.    #print inwords
  143.  
  144.    i = int(minw) ; iwords = "" ; a = 0
  145.  
  146.    while (int(i) != int(maxw) + 1) :
  147.  
  148.        for a in range(i):
  149.            if int(i) != (int(a) + 1):
  150.                iwords += "i" + str(i) + str(a) + " + "
  151.            else:
  152.                 iwords += "i" + str(i) + str(a)
  153.  
  154.            data = (int(a + 2) * tab + "for i" + str(i) + str(a) + " in (" + inwords + "):\n")
  155.            f.write(data)
  156.  
  157.        f.write(int(i + 2) * tab + "word = '' ; value = ''\n")
  158.        f.write(int(i + 2) * tab + "word = " + iwords + "\n")
  159.  
  160.        if typeh == '1' : f.write(int(i + 2) * tab + "hash = md5.new()\n")
  161.  
  162.        if typeh == '2' : f.write(int(i + 2) * tab + "hash = sha.new()\n")
  163.  
  164.        f.write(int(i + 2) * tab + "hash.update(str(word))\n")
  165.        f.write(int(i + 2) * tab + "value = hash.hexdigest()\n")
  166.        if verbose == 1 : f.write(int(i + 2) * tab + "print " + iwords + ' + " : " + str(value)\n')
  167.        f.write(int(i + 2) * tab + "if str(hashh) == str(value):\n")
  168.        f.write(int(i + 3) * tab + "raise Exception\n")
  169.        iwords = ""
  170.        i += 1
  171.  
  172.    f.write(tab + "except(Exception):")
  173.    f.write('\n'+ 2 * tab + "print '********************  Hash Crackeado ' + 20 * '*'")
  174.    f.write('\n' + 2 * tab + "print '[+] HASH :', hashh")
  175.    f.write('\n' + 2 * tab + "print '[+] PASS :', str(word)")
  176.    f.write('\n' + 2 * tab + "print '[+] Hora de finalizacion :', timer()")
  177.    f.write('\n' + 2 * tab + "sys.exit(1)")
  178.    f.write('\n' + tab + "except(KeyboardInterrupt):")
  179.    f.write('\n' + 2 * tab + "print '[+] Process Ended ',timer()")
  180.    f.write('\n' + 2 * tab + "sys.exit(1)")
  181.    f.write("\ncrackhash()")
  182.    f.close()
  183.  
  184.    print '[+] Hora de inicio : ', timer()
  185.  
  186.    import CRACK
  187.    CRACK.crackhash()



Saludos!
9  Programación / Scripting / Crackeador MD5 por Diccionario [PYTHON] en: 3 Septiembre 2010, 16:11 pm
Hola gente, les vengo a dejar este sencillo code en Python, es un crackeador por MD5 que funciona con diccionario.

Modo de uso:

Código:
Cracker.py [HASH (MD5)] [Diccionario]

Ejemplo:

Código:
Cracker.py e10adc3949ba59abbe56e057f20f883e diccionario.txt

Nota: el diccionario debe estar en el mismo directorio que el crackeador.

Código
  1. import md5, sys, getopt
  2. ver= "1.0"
  3. a=0
  4. def run():
  5.  
  6. if len(sys.argv) == 1 or sys.argv[1]=="-h" or sys.argv[1]=="--help":
  7.  
  8. print ""
  9. print ""
  10. print "ANTRAX"
  11. print "WWW.ELHACKER.NET"
  12. print ""
  13. print "Modo de uso: Cracker.py [HASH (MD5)] [Diccionario]"
  14. print ""
  15. print "Ejemplo: Cracker.py e10adc3949ba59abbe56e057f20f883e diccionario.txt"
  16. print ""
  17.  
  18. else:
  19. if sys.argv[1]=="-v" or sys.argv[1]=="--version":
  20. print "Cracker version: " + ver + "\nAutor: ANTRAX"
  21.  
  22.  
  23. if len(sys.argv) == 3:
  24.    md5crack(sys.argv[1],sys.argv[2],)
  25.  
  26.  
  27. def md5crack(hash,word):
  28. try:
  29. wordlist = open(word,"r")
  30. except IOError:
  31. print "Diccionario: " + word + " No Existe"
  32. sys.exit(0)
  33.  
  34. global a
  35.  
  36. for line in wordlist.xreadlines():
  37. word= line.replace("\n","")
  38. passw = md5.new(word)
  39.  
  40. if (hash == passw.hexdigest()):
  41. print ""
  42. print "Password Crackeada!"
  43. print 'MD5: ' + passw.hexdigest() + ' ---> ' + word+''
  44. print "BY ANTRAX"
  45. a = 1
  46. sys.exit(0)
  47.  
  48. if ( a == 0):
  49. print 'Password no Encontrada en este diccionario'
  50. wordlist.close()
  51.  
  52. def main():
  53. run()
  54.  
  55.  
  56. if __name__ == "__main__":
  57.    main()

Saludos!

ANTRAX
10  Seguridad Informática / Seguridad / Re: wenas, no se como me infectado con esto en: 30 Agosto 2010, 01:27 am
Mira.. sinceramente con todos los que he probado, me quedo con el ZoneAlarm 2010.
Pero tambien se que es bueno el Outpost

Saludos!

ANTRAX
Páginas: [1] 2 3
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines