Sección de códigos , trucos y ejemplos para visual basic
<Volver> - Anterior - Siguiente
Ejemplos para para poder encriptar y desenciptar cadenas de caracteres en visual basic
Código fuente realizado por Harvey Triana ( Si querés visitar su sitio web --> Harvey Triana )
Este es un algoritmo que permite encriptar y desencriptar cadenas de caracteres
La función se llama EncryptString y tiene tres parámetros:
'---------------------------------------------------------------------
' EncryptString
' Modificado por Harvey T.
'---------------------------------------------------------------------
Public Function EncryptString( _
UserKey As String, Text As String, Action As Single _
) As String
El parámetro UserKey es la clave.
El parámetro Text es el texto a encriptar o desencriptar.
El parámetro Action indica QUE hacer, ..es decir Encriptar o desencriptar. ( El valor ENCRYPT es para encriptar y el valor DECRYPT para desencriptar)
Código fuente de la función:
Este otro código fuente fue enviado por Miguel Cejas.
El mismo, tiene dos funciones, una para encriptar y la otra para desencriptar. El único parámetro que requieren las funciones, .. es el dato en cuestión a codificar o decodificar
Colocar un CommandButton en el formulario y agregar un módulo bas al proyecto
Código fuente en el form1
Código fuente en el módulo bas
Sencillo módulo de clase que encripta y desencripta un password o cadena utilizando un simple algorítmo
Formulario de prueba
Descargar módulo clsEncriptPass
Ejemplo enviado por Luis Nuñez de Chile que permite encriptar strings o cadenas de caracteres en vb
Para el poyecto colocar en el formulario dos controles textbox ( txtEntrada y txtSalida )y dos commandbutton ( Command1 y Command2 ) como se ve en este gráfico
Código fuente en el form
Ejemplo enviado por SKL , de un formulario para encriptar y desencriptar una cadena de caracteres, recorreindo cada caracter y cambiándole el código Ascii
Buscar en Recursos vb
Recursos visual basic - Buscar - Privacidad - Copyright © 2005 - 2009 - www.recursosvisualbasic.com.ar