checkadmin.asp

自由领域ASP+WAP同学录(V1.0)系统是一套仿ChinaRen的即可用电脑浏览又可以用手机访问的互动同学录单班级系统。这套系统同学录系统可以满足现在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&"manage/login.asp';</script>"
  Response.End
End if
%>