| |
####################LBp
sub check_pid {#进程号检测. w!8
if (!-e "$userhead$_[0].cgi") {&error("错误的用户进程号，请重新登录！");}Y9J
do "$cgihead/profile.cgi"; &uinfo($_[0]);S:
($ustatus,$ultime,$ulip,$uleword)=split(/_/,$ustats);iEF,
my ($chkpid,$chkpass,$check_id);SBt&8[
$chkpid=crypt($ultime,$uleword);b-%T
$chkpid=substr($chkpid,2,length($chkpid));NE6H/k
$chkpass=crypt($upass,$uleword);`TNxq
$chkpass=substr($chkpass,2,length($chkpass));1q&g+
$check_id="$chkpass$chkpid";oy
if ($check_id ne $_[1]) {/,
&error("错误的用户进程号，请重新登录！")sEj
} elsif ($fields{'job'} eq "logout") {[?[
$ustats="logout_".$statsno."_".$userip."_0";u%G
&writeuserfile($_[0],"$_[0]‖$upass‖$uname‖$usex‖$ucontact‖$uclass‖$ulevel‖$ustats‖$uxx22‖$uxx23‖$uxx24‖$uxx25‖$uxx26‖$uxx27‖$ut1‖$ut2‖$ut3‖$ut4‖end\n");W4}n
$fields{'uid'}=""; $fields{'pid'}="";]=?F
&redirect("$System_Domain","您已成功退出系统！");,DD
}Wr[
}©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 Fsc0eI
####################~C'U7b
sub check_password {#密码检测{H|RG
©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 D>
return 0 if (!-e "$userhead$_[0].cgi");?,5O
do "$cgihead/profile.cgi"; &uinfo($_[0]);#.k)7e
my ($check_password,$chkpid,$pid);fQy
$check_password=crypt($_[1],$cword);^t0md}
$check_password=substr($check_password,2,length($check_password));kk
return 0 if ($check_password ne $upass);.gy
©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 jn
my $newdes=&randompass("2");_
($ustatus,$ultime,$ulip,$uleword)=split(/_/,$ustats);Y-o
$ustats="login_".$statsno."_".$userip."_$newdes";t
&writeuserfile($_[0],"$_[0]‖$upass‖$uname‖$usex‖$ultime‖$uclass‖$ulevel‖$ustats‖$uxx22‖$uxx23‖$uxx24‖$uxx25‖$uxx26‖$uxx27‖$ut1‖$ut2‖$ut3‖$ut4‖end\n");d*2P
©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 /xR{kB
($ustatus,$ultime,$ulip,$uleword)=split(/_/,$ustats);L
$check_password=crypt($check_password,$uleword);g[F,UK
$check_password=substr($check_password,2,length($check_password));XeUI{
$chkpid=crypt($ultime,$uleword);'
$chkpid=substr($chkpid,2,length($chkpid));dUc9A@
$pid="$check_password$chkpid";\:tuz
return $pid;Al!!
}©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 >0
©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 :yPkD
©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 z`z,7n
©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 Y*n^
©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂 q]i
现在是限制单线程登陆的，我想把管理员设置成多线程登陆的，怎么更改上面的语句呢？谢谢了．．．．H6*
| | |
|
|
|
顶端 
加到"个人收藏夹"
主题管理：
总固顶 
取消总固顶 
消息
查看
搜索
好友
引用
回复
只看我
2006/01/03 00:37pm 
IP: 已设置保密
