加密解密(100分)

  • 主题发起人 主题发起人 pzj
  • 开始时间 开始时间
P

pzj

Unregistered / Unconfirmed
GUEST, unregistred user!
如何对登录界面的用户密码进行加密和解密:
如:对用户输入密码如何控制在数据库中所见为掩码
; ; 在进行校验时如何解密的问题,很简单的问题,请
; ; 大虾帮忙,指点,小弟是入门级的小生,急,100分
; ; 奉送!
 
异和
function encryptString(St: string; Pwd: Integer): string;
var
; ; I, num: integer;
begin
; ; St := trim(st);
; ; Num := length(st);
; ; Result := '';
; ; for i := 1 to Num do
; ; begin
; ; ; ; Result := Result + chr(ord(st) xor pwd);
; ; end;

end;
 
搜索bbs ;
 
这个很多呀!!!!
比如说: 对于用户录入的字母,分别后移两位,A-->C,B-->E,
; ; ; ; ; ; ; ; ; ; ; ;数值则加3,并格式化为两位,6-->11,2-->07
; 如果录入AB62,则数据库中保存为:CE1107

解密则相反!!!
 
建议不要解密进行明文比较,而将用户输入加密后与密文进行比较。
 
后退
顶部