check.asp

来自「一个非常优秀的自动建站程序」· ASP 代码 · 共 22 行

<!--#include file="conn.asp"-->
<%
If (isnull(session("ID"))) or session("ID")="" Then
response.redirect "index.asp"
End If
Function GradeText(Grade)
Select Case Grade
Case "1"
GradeText="普通会员"
Case "2"
GradeText="铜牌代理"
Case "3"
GradeText="银牌代理"
Case "4"
GradeText="金牌代理"
Case "5"
GradeText="合作伙伴"
Case else
GradeText="非法用户"
End Select
End Function
%>