?? rego.asp
字號:
<!--#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">
<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>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -