Lunes 23 de Diciembre de 2024, 00:41
SoloCodigo
Bienvenido(a),
Visitante
. Por favor,
ingresa
o
regístrate
.
¿Perdiste tu
email de activación?
Inicio
Foros
Chat
Ayuda
Buscar
Ingresar
Registrarse
SoloCodigo
»
Foros
»
Programación General
»
Visual Basic 6.0 e inferiores
(Moderador:
F_Tanori
) »
Encriptamiento
« anterior
próximo »
Imprimir
Páginas: [
1
]
Autor
Tema: Encriptamiento (Leído 2110 veces)
RadicalEd
Moderador
Mensajes: 2430
Nacionalidad:
Encriptamiento
«
en:
Viernes 24 de Septiembre de 2004, 19:21 »
0
HOLA CHICOS DE SOLOCODIGO ESTOY HACIENDO UN PROGRAMITA DE ENCRIPTAMIENTO CON EL COMANDO XOR Y 3 TEXTBOX PARA ENCRIPTAR CON VARIOS VALORES, PERO AQUI VIENE EL PROBLEMA CON 2 TEXTBOX LO MAXIMO ES VALOR 9 Y 25 Y CON 3 ME TOCA DEJARLO CON 1-1-1 POR QUE ME SACA EL ERROR DE
Código: Text
Run-time error '5':
Invalid procedure call or argument
[/color]
AQUI LES VA EL CODIGO DE ENCRIPTAMIENTO Y EL SOURCE DEL PROGRAMA AYUDENMEN A MEJORARLO GRACIAS
Código: Text
Private Sub Command1_click()
Dim TextoAux As String, Texto As String
Dim I As Integer
Texto = ""
If Text2.Text = "" Then
Call MsgBox("Favor dar valor de encriptamiento", 16, "Warning")
Else
For I = 1 To Len(Text1.Text)
Text1.SelStart = I - 1
Text1.SelLength = 1
TextoAux = Text1.SelText
Texto = Texto + Chr$(Asc(TextoAux) Xor Text2.Text & Text3.Text & Text4.Text)
Next I
End If
Text1.Text = Texto
End Sub
A Y CON 4 TEXTBOX EN ADELENTE NO ME SIRVE
GRACIAS CHAO
El mensaje contiene
1 archivo adjunto
. Debes
ingresar
o
registrarte
para poder verlo y descargarlo.
Tweet
El pasado son solo recuerdos, el futuro son solo sueños
RadicalEd
Moderador
Mensajes: 2430
Nacionalidad:
Re: Encriptamiento
«
Respuesta #1 en:
Viernes 24 de Septiembre de 2004, 21:15 »
0
ACABO DE ENCONTRAR OTRO ERROR CUANDO ES UN TEXTO LARGO EN LETRAS ME ELIMINA GRAN PARTE DE ELLAS A VECES DEJA SOLO 2 CARACTERES ENCRIPTADOS Y CUANDO LOS DESENCRIPTO ME APARECEN LOS 2 NO MAS ESTO ME PASA CON 3 VALORES DE ENCRIPTACION
El pasado son solo recuerdos, el futuro son solo sueños
Imprimir
Páginas: [
1
]
« anterior
próximo »
SoloCodigo
»
Foros
»
Programación General
»
Visual Basic 6.0 e inferiores
(Moderador:
F_Tanori
) »
Encriptamiento