📄 cf_reclogin.asp

📁 支持多种播放器RealPlayer,MediaPlayer
💻 ASP
字号:
<%
'乘风电影程序
'制作：乘　风
'QQ：178575
'E-Mail：yliangcf@163.com
'开发网站：http://www.qqcf.com
'详细简介：http://www.qqcf.com/?action=list&list=cffilm
'上面有程序在线演示，安装演示，使用疑难解答，最新版本下载等内容
'因为这些内容可能时常更新，就没有放在程序里，请自己上网站上查看
'有完整版本的演示，包括如何实际整合Helix,Serv-u完全的实现在线播
'放和下载防盗链等
%>

<!--#Include File="Conn.asp"-->
<!--#Include File="CF_MyFunCtion.asp"-->
<!--#Include File="CF_Md5.asp"-->
<%
 Ly=ChkStr(Request.ServerVariables("HTTP_REFERER"),1)
 
 Lo_DRoot=HttpPath(2)
 If Instr(Ly,Lo_DRoot)=0 Then
  Response.write "来源有错误"
  Response.End
 End If


 UserName=ChkStr(Trim(Request.Form("UserName")),1)
 Pwd=ChkStr(Trim(Request.Form("Pwd")),1)
 Cookies_Time=Int(ChkStr(Request.Form("Cookies_Time"),2)
 
 CheckCode=ChkStr(Request.Form("CheckCode"),1)
 
 If UserName="" Or Pwd="" Then
  Response.write "参数错误"
  Response.End
 End If

 Ip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
 If Ip= "" Then Ip= Request.ServerVariables("REMOTE_ADDR")


 CheckCode_2=FSOFileRead("CF_temp.asp")
 CheckCode_2=Mid(CheckCode_2,4,Len(CheckCode_2)-5)'取出标记中间字符
 
 If CheckCode_2<>CheckCode Then
  Response.write "验证码有误"
  Response.End
 End If


  CFFilmUserCookie=Md5(1&UserName&Pwd&GetMySet("SysCode"),1)
  
  If Cookies_Time>0 Then
   Cookies_Time=Dateadd("n",Cookies_Time,Now())
   Response.Cookies("CFFilmUserCookie")=CFFilmUserCookie
   Response.Cookies("CFFilmUserCookie").expires=Cookies_Time
  End If
  
  Sql="Update CFFilm_User Set Logintotal=Logintotal+1,LastLoginTime=Now(),LastLoginIp='"&Ip&"',Cookies='"&CFFilmUserCookie&"' Where UserName='"&UserName&"'"
  Conn.ExeCute Sql

  Session("CFFilmUser")=UserName
  
  Response.Redirect "Manage.asp"
  Response.End
%>

php_rec_login_code

<?
@include("CF_phpuserrec.php");
?>
<?
function alerturl($alertstr,$url)
{
  echo "<script>";
  echo "alert('".$alertstr."');";
  echo "location.href='".$url."';";
  echo "</script>";
  exit;
}

function chkstr($inputstr) //过滤非法字符
{
 $inputstr=str_replace("'"," ",$inputstr);
 return $inputstr;
}

$UserName=chkstr($_GET["UserName"]);
$pwd=chkstr($_GET["pwd"]);
$cookies_time=chkstr($_GET["cookies_time"]);

$pwd_2=chkstr($_GET["pwd"]);

if($passwordtype==2) $pwd_2=substr(md5($pwd_2),8,16);
if($passwordtype==3) $pwd_2=md5($pwd_2);

 $sql="select * from $saveregtable where $saveregusername='$UserName'";
 $result=mysql_query($sql);
 $rs=mysql_fetch_array($result);
 
 if ($rs[$saveregusername]=="") alerturl("没有此用户","index.asp");
 if ($rs[$saveregpassword]<>$pwd_2) alerturl("密码错误","index.asp");
 
 $checkcode=md5($UserName.$pwd);
 
 $fp=@fopen("CF_Temp.asp","w") or die("写方式打开文件 $filename 失败");//把正确的验证码写入临时文件中
 @fputs($fp,"<%'".$checkcode."%>") or die("文件写入失败"); 
 @fclose($fp); 
?>

<body onLoad="form1.submit();">
<form method="post" name="form1" action="CF_RecLogin.asp">
 <input type="hidden" name="UserName" value="<?echo $UserName?>">
 <input type="hidden" name="pwd" value="<?echo $pwd?>">
 <input type="hidden" name="cookies_time" value="<?echo $cookies_time?>">
 <input type="hidden" name="checkcode" value="<?echo $checkcode?>">
		
 <input type="hidden" name="loginsubmit" value="会员登录">
</form>
<body>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -