rego.asp

来自「一个超级漂亮的班级主页asp代码」· ASP 代码 · 共 62 行

ASP
62 行
字号 
<!--#include file="in_conn.asp"-->


<%
'获取传值
dim rtype,rcmd,rp_ico,rp_str,url,urlcn
rtype=Request.Querystring("type")
rcmd=Request.Querystring("cmd")
url="index.asp"
urlcn="班级首页"

SELECT CASE rtype
	Case "tip"
		rp_ico="jjtip.gif"
	Case Else
		rp_ico="jjgo.gif"
END SELECT

SELECT CASE rcmd
	Case "log_ok"
		rp_str="<font class='ft1'>"&Session("sname")&"</font>，登录成功!３秒后自动转向班级首页。。。"
		url="index.asp"
		urlcn="班级首页"
	Case "log_msg"
		rp_str="<font class='ft1'>"&Session("sname")&"</font>，登录成功，您有<b><font color=red>系统消息</font></b>，３秒后自动转向成员中心。。。"
		url="uinfo.asp"
		urlcn="成员中心"
	Case "reg_ok"
		rp_str="<font class='ft1'>"&Session("sname")&"</font>，恭喜你，申请注册成功!３秒后自动转向成员中心。。。"
		url="uinfo.asp"
		urlcn="成员中心"
	Case "mod_ok"
		rp_str="<font class='ft1'>"&Session("sname")&"</font>，恭喜你，修改资料成功!３秒后自动转向成员中心。。。"
		url="uinfo.asp"
		urlcn="成员中心"
	Case "skin_ok"
		rp_str="正在刷新页面!３秒后自动转向班级首页。。。"
		url="index.asp"
		urlcn="班级首页"
	Case Else
		rp_str="太晕哦，未知错误!"
END SELECT
%>

<body>
<br><br><br>

<table align="center" width="700" height="50" border="0" cellspacing="0" cellpadding="11" class="rdkuang"><tr>
	<td width="100%" height="100%" align="center">
		&nbsp;<img src="img/<% =rp_ico %>" border="0">
		<% =rp_str %><br>
		如果自动转向失败，请［<a href="<% =url %>">点击这里转向<% =urlcn %></a>］
	</td>
</tr></table>

<script defer language="javascript" charset='gb2312'>
	setTimeout('location.href="<% =url %>"',3000);
</script>
</body>

</html>

rego.asp - 源码说明

本页面展示了「一个超级漂亮的班级主页asp代码」中的 rego.asp 源码文件，采用 ASP 编程语言编写，共 62 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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