admin_login_check.asp

WAP网上购物系统源程序,,有兴趣的朋友,一起研究一下..交流经眼

<%
Dim adminname,adminpassword
adminname=Trim(Split(const_admin,"|")(0))
adminpassword=Trim(Split(const_admin,"|")(1))
If Session("adminname")=adminname and Session("adminpassword")=adminpassword Then
Else
  Response.write "<script>top.location.href='"&const_txl_HomeUrl&"admin_login.asp';</script>"
  Response.End
End if
%>