求一个简单的加密、解密方法！

[huuqj]

本人刚刚学习PB，现象了解加密、解密，希望各位能给个简单的例子！

[mittee]

加密的方法有很多种，你可以把字串转化成asc码，然后加一减一的。
你自己想 。

[cckk426]

PowerBuilder7.0/8.0时尚编程百例上有一个

[qiyousyc]

//字符串加密函数
int i,j,i_len,n,k
string s_mode='23569875125423' //加密模板
int i_st=100 //加密起始值
string s1,s2
int i_asc

i_len=len(s_in) //字符长
n=len(s_mode) //模长
j=Ceiling(i_len/n)

for i=1 to j
for k=1 to n
s1=left(s_in,1)
s_in=mid(s_in,2)
i_asc=asc(s1)+100+long(mid(s_mode,k,1))
if i_asc>255 then i_asc=i_asc - 255
s2=s2+char(i_asc)
if (i - 1)*n+k=i_len then exit
next
next
s_in=s2



//字符串解密函数
int i,j,i_len,n,k
string s_mode='23569875125423' //加密模板
int i_st=100 //加密起始值
string s1,s2
int i_asc

i_len=len(s_in) //字符长
n=len(s_mode) //模长
j=Ceiling(i_len/n)

for i=1 to j
for k=1 to n
s1=left(s_in,1)
s_in=mid(s_in,2)
i_asc=asc(s1) - 100 - long(mid(s_mode,k,1))
if i_asc<1 then i_asc=i_asc + 255
s2=s2+char(i_asc)
if (i - 1)*n+k=i_len then exit
next
next
s_in=s2

[wantsong]

比如string s_t="abcd"，用字符数组将字符取出，string s_ts[] = {a,b,c,d},s_ts =" "
然后循环取s_ts[i]的ascII得到integer i_value，i_value++ ，在转换成字符放入s_ts[i]，s_ts +=s_ts[i]
循环完去掉头空格
加密完成
解密时，逆向得出，只是i_value--

[huuqj]

谢谢各位！