Kioskea
Buscar
Haz una pregunta Denunciar

Cm poner l codigo ASCII anterior de una letr

lena lonso - Última respuesta el 15 sep 2011, 04:52
Hola,
m gustaria saber cm puedo acer un programa para encriptar una palabra, es decir, teniendo una cadenas cn una serie de caracteres, poner cada uno de esos caracteres ,pero q sean el codigo ASCII anterior.si en la cadena pone una B,ponemos en la otra cadena una A. ES Q NO M SALE.
GRACIAS.
Sigue leyendo 
Respuesta
+3
moins plus
usa ASC y CHR. La primera te da el numero le tenes que indicar el caracter, en cambio CHR te devuelve el carcter, le tener que indicar el numero

algo asi podria ser

Function Encriptar(strCadena As String) As String

Dim i As Integer
Dim strTemp As String

For i = 1 To Len(strCadena)
strTemp = strTemp & Chr(Asc(Mid(strCadena, i, 1)) - 1)
Next
Encriptar = strTemp
End Function

Private Sub Form_Load()
MsgBox Encriptar("Visual basic")
End Sub

Aqui puedes ver otros ejemplos y métodos de encriptación simples.

http://www.recursosvisualbasic.com.ar/...
http://www.devjoker.com/asp/ver_contenidos.aspx?co_contenido=2

Si quieres otros mas avanzados busca en google por MD5, Blowfish, AES etc ..

espero que t sirva !!
Deja tu comentario
Respuesta
+0
moins plus
pues rebuscste papa por q si esta jodido eso jajajajajjjaa
Deja tu comentario
Respuesta
+0
moins plus
Me parece una forma sencilla ese método, lo voy a probar en un proyecto que necesito


gracias, manuel
Deja tu comentario
El documento « cm poner l codigo ASCII anterior de una letr » de Kioskea (es.kioskea.net) se encuentra disponible bajo una licencia Creative Commons. Puedes copiarlo o modificarlo bajo las condiciones señaladas por esta licencia. Deberás hacerla siempre visible y dar crédito a Kioskea.

¿Todavía no eres usuario?

inscríbete, gratuitamente y en menos de un minuto!

Los miembros obtienen más respuestas que los usuarios anónimos.

Ser miembro te permite llevar un seguimiento detallado de tus consultas.

Ser miembro te permite gozar de otras opciones adicionales.