SET TALK OFF
A="041000044047054037000057047053001"
?
FOR I=1 TO LEN(A)/3
??CHR(VAL(SUBSTR(A,I*3-2,3))+32)
ENDFOR
RETURN

Tiger5392,真逗。是你自己编的吗？怎么琢磨出来的。

呵呵。... ASCII码吗?

星期天，很烦闷，做点东西把自己逗乐，也与大家同乐。

不完全是ASCII码，在ASCII基础上修改过的码，三位表示一个字符

你这个思路很好，用在数据加密上岂不美妙！

我在编写登陆界面程序的时候，不是要输入用户名和密码吗?而这些内容必须存储在表中。表中的用户名可以公开,但密码不能公开。所以人们打开用户表的时候，密码可以看见，但不能用，因为这些是加了密的密码，一定不是直接显示出来的。加密算法越有效，保密性就越强，但就苦了解密了。

真诚邀请两位:Tiger5392 wzxc
加入我的QQ群:25082354

我的密码表就是这样做的。即使打开表看，也是乱码。但我的加密算法不如你的高明。我水平很低，望多加指教。谢谢邀请!

这个密码很简单的，就是输入任何可见字符以后转换成十进制的ASCII值，每个值减去32以后再将数值转换成字符型。解码当然就是要提取每个数值以后加上32了。