• Lunes 23 de Diciembre de 2024, 05:46

Autor Tema:  Como Crear Un Generador De Claves  (Leído 1913 veces)

darksoul

  • Nuevo Miembro
  • *
  • Mensajes: 3
    • Ver Perfil
Como Crear Un Generador De Claves
« en: Miércoles 29 de Septiembre de 2004, 13:36 »
0
hola a todos espero que me puedan ayudar en esto
quiero crear un keygen o generador de seriales

solo eh podido hacerlos con un serial no eh podido meterle mas

este es el ejemplo de lo que ise
 
public sub command1_click()
Rem que funcio o que variables se le deve de poner a esto para que  me genere mas  en los demas foros no me an podido decir les voy a dejar el link de lo que ise yo

text1.text = " el serial ok "

end sub

alguien me puede decir como se le tien que hacer para que el boton de comando al aplanarle varias veces me pueda generar mas claves

aqui esta la url de los archivos


macromedia studio mx 2004
esta es lapalicacion


macromedia stuiod mx 2004 proyecto
este es el proyecto espero que alguien me pueda ayudar

atte darksoul

www.sailent.com

RadicalEd

  • Moderador
  • ******
  • Mensajes: 2430
  • Nacionalidad: co
    • Ver Perfil
Re: Como Crear Un Generador De Claves
« Respuesta #1 en: Miércoles 29 de Septiembre de 2004, 19:16 »
0
HOLA QUE QUIERES HACER NO TE ENTIENDO. SI QUIERES HACER UN KEYGEN, PUEDES UTILIZAR EL COMANDO Rnd DE VISUAL PARA GENERAR DIFERENTES VALORES, AQUI TE VA UN CODIGO POR SI TE SIRVE
Código: Text
  1.  
  2. Private Sub Command1_Click()
  3. Dim x As Integer
  4. For x = 1 To 30
  5.     Randomize
  6.     d = Int(Rnd * 255) + 1
  7.     h = Chr(d)
  8.     Text1.Text = Text1.Text & h
  9. Next
  10. End Sub
  11.  
[/color]
El pasado son solo recuerdos, el futuro son solo sueños

RadicalEd

  • Moderador
  • ******
  • Mensajes: 2430
  • Nacionalidad: co
    • Ver Perfil
Re: Como Crear Un Generador De Claves
« Respuesta #2 en: Miércoles 29 de Septiembre de 2004, 19:28 »
0
ESTA PUEDE SER OTRA, PERO TE TOCARIA USAR MAS VARIABLES SEGUN LA CANTIDAD DE DIGITO A COLOCAR EN TU KEYGEN
Código: Text
  1.  
  2. Private Sub Command1_Click()
  3. Text1.Text = ""
  4. Randomize
  5. d = Int(Rnd * 255) + 1
  6. H = Chr(d)
  7. x = "H"
  8. Randomize
  9. L = Int(Rnd * 255) + 1
  10. C = Chr(L)
  11. M = "2"
  12. Text1.Text = Text1.Text & H & x & C & M
  13. End Sub
  14.  
  15.  
[/color]
El pasado son solo recuerdos, el futuro son solo sueños

darksoul

  • Nuevo Miembro
  • *
  • Mensajes: 3
    • Ver Perfil
Re: Como Crear Un Generador De Claves
« Respuesta #3 en: Miércoles 29 de Septiembre de 2004, 20:55 »
0
a ya vi  digamos que puedo utilizar estoy ejemplo pero esta mal en mi pregunta

lo que quiero hacer es un generador de textos en la cual me genere varias palabras al planarle al boton pero deja utilizar estos codigos

Cyclop

  • Miembro MUY activo
  • ***
  • Mensajes: 323
    • Ver Perfil
    • http://www.geocities.com/icotext/spanish/
Re: Como Crear Un Generador De Claves
« Respuesta #4 en: Jueves 30 de Septiembre de 2004, 01:56 »
0
El activelock es un codigo en VB para bloquear con seriales tus porgramas biene incluido un Keygen

ActiveLock

Salu2

Cyclop
Icotext Evolution v0.5 para los amantes del ASCII Art
http]