pues mira hay formas de como codificar textos como dices (encriptar) esto lo haces por medio de un script aqui te dejo un ejemplo que encontre hace tiempos aqui mismo lo puedes modificar a tu gusto y tus necesidades
Código:
<html>
<head>
<title></title>
</head>
<body>
<%
Contrasena = "password" 'Request.Form("Contrasena")
Function ContrasenaCodifica(Contrasena)
Dim vLongitud, vCaracter, vCodificado
vLongitud = Len(Contrasena)
vCodificado = ""
For vCaracter = 1 To vLongitud
vCodificado = vCodificado & Chr(Asc(Mid(Contrasena, vCaracter, 1)) + 50)
Next
ContrasenaCodifica = vCodificado
End Function
Texto = ContrasenaCodifica(Contrasena)
Response.Write(Texto)
%>
<br>
<%
Contrasena = Texto
Function ContrasenaDecodifica(Contrasena)
Dim vLongitud, vCaracter, vCodificado
vLongitud = Len(Contrasena)
vCodificado = ""
For vCaracter = 1 To vLongitud
vCodificado = vCodificado & Chr(Asc(Mid(Contrasena, vCaracter, 1)) - 50)
Next
ContrasenaDecodifica = vCodificado
End Function
Texto = ContrasenaDecodifica(Contrasena)
Response.Write(Texto)
%>
</body>
</html>