Crear Keygen

[Cesar2990]

Hola amigos tengo un problemita con esto quiesiera hacer un key gen sencillo, bueno lo q tengo en mente es poner un texto y ese texto me lo combierta a codigos ascii o a sus numeros ascii, ejemplo:

mi texto seria -> cesar
mi clave: c= 99, e=101 y asi etc

al final quiero q se junten estos numeros 99101 y asi sucesivamente porfavor alguien ayudeme o si hay otra forma sencilla de hacer un keygen se los agradeceria mucho.

[Spike_ak]

Si pensas programar vas a tener que usar el cerebro, pensar, buscar la logica. Principalmente vas a tener que PENSAR, hacer diagramas etc...

[ReViJa]

Mira de esta manera:
Crea dos campos de texto "text1, text2" y pon este code.

Código:

Dim x, y

Private Sub Text1_Change()

If Len(Text1) = 0 Then
  Text2 = ""
  Exit Sub
End If

If x <= Len(Text1) Then
  Text2 = Text2 & Asc(Right(Text1, 1))
  Text1.Tag = Text1
Else
  Text2 = ""
  y = 0
  Do
    y = y + 1
    Text2 = Text2 & Asc(Mid(Text1, y, 1))
  Loop Until y >= Len(Text1)
End If

x = Len(Text1)

End Sub

habrán mejores maneras pero asi a vote pronto se me ocurre esta.

Un saludo.

[Cesar2990]

Gracias Revija Funciona de maravilla mil gracias, se ve q vos si sabes ayudar, y no te dedicas a decir tonterias como "La Ignorancia es la Fuerza" mil gracias.