chinahth 发表于 2010-7-3 18:34:45

浪潮软件用户口令的加密方式谁有啊

浪潮软件用户口令的加密方式谁有啊

gave 发表于 2010-7-5 16:54:46

//Public function gfpassexpand (ref string pspass) returns integer

integer i
integer vitemp
integer vicz
integer vinum
char vcbegin
char vcend
char vcfirst
char vcsecond
string vstemp
string vspass


vcbegin = left(pspass,1)
vcend = right(pspass,1)
vicz = asc(vcend) - asc(vcbegin)
pspass = mid(pspass,2)
pspass = left(pspass,len(pspass) - 1)
vinum = 0
FOR i = len(pspass) TO 1 STEP-2
        vinum ++
        IF mod(vinum,2) = 1 THEN //20
                vcfirst = mid(pspass,i - 1,1)
                vcsecond = mid(pspass,i,1)
        ELSE //20
                vcfirst = mid(pspass,i,1)
                vcsecond = mid(pspass,i - 1,1)
        END IF //20
        vitemp = (asc(vcfirst) - asc(vcbegin)) * 26 + asc(vcsecond) - 97 - vicz
        vstemp = char(vitemp)
        vspass = vspass + vstemp
NEXT

return vspass
页: [1]
查看完整版本: 浪潮软件用户口令的加密方式谁有啊