SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: darksoul en Miércoles 29 de Septiembre de 2004, 13:36

Título: Como Crear Un Generador De Claves
Publicado por: darksoul en Miércoles 29 de Septiembre de 2004, 13:36
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 (http://www.sailent.com/keygen/macromedia%20mx%202004%20serial.exe)
esta es lapalicacion


macromedia stuiod mx 2004 proyecto (http://www.sailent.com/keygen/macromedia%20mx%202004%20serial.rar)
este es el proyecto espero que alguien me pueda ayudar

atte darksoul

www.sailent.com (http://www.sailent.com)
Título: Re: Como Crear Un Generador De Claves
Publicado por: RadicalEd en Miércoles 29 de Septiembre de 2004, 19:16
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]
Título: Re: Como Crear Un Generador De Claves
Publicado por: RadicalEd en Miércoles 29 de Septiembre de 2004, 19:28
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]
Título: Re: Como Crear Un Generador De Claves
Publicado por: darksoul en Miércoles 29 de Septiembre de 2004, 20:55
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
Título: Re: Como Crear Un Generador De Claves
Publicado por: Cyclop en Jueves 30 de Septiembre de 2004, 01:56
El activelock es un codigo en VB para bloquear con seriales tus porgramas biene incluido un Keygen

ActiveLock (http://www.activelock.com/download.html)

Salu2

Cyclop