?? regsuc.asp
字號:
<%@ language=vbscript%>
<!--#include file="search.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>用戶登記</title>
</head>
<%id=request.form("id")
oldid=request.form("oldid")
cla=request.form("cla")
keys=request.form("keys")
oldintro=request.form("oldintro")
webname=request.form("webname")
url=request.form("url")
topurl=request.servervariables("server_name")&request.servervariables("script_name")
topurl=replace(topurl,"regsuc.asp","count.asp")
%>
<body>
<div align="center">
<table border="0" cellpadding="3" cellspacing="1" width="664" height="254" bgcolor="#9AADCB" style="font-size: 9pt">
<tr>
<td width="875" height="12" bgcolor="#FFFFFF">
<p align="center"><span id=msg>申請成功！</span></td>
<td width="194" height="254" rowspan="3" bgcolor="#FFFFFF">
<p align="left"><img border="0" src="img/0009.gif" width="166" height="320"></td>
</tr>
<tr>
<td width="875" height="112" bgcolor="#FFFFFF" valign="top">
<p>
請將以下代碼插入您主頁的任意位置：<br>
<script language=vbscript <br>
src="http://<%response.write topurl%>?user=<%response.write oldid%>&view=yes&minu=2"></script></td>
</tr>
<tr>
<td width="875" height="105" bgcolor="#FFFFFF" valign="top">
<p>說明：id為您的用戶名;view決定該記數器是否看見：其中view=yes為可見,view=no為隱藏;miu表示您在線人數是統計X分鐘內的人數,一個用戶X分沒有刷新頁面視為不在線。</td>
</tr>
</table>
</div>
<%
if request.form("sohu")="ON" then
%>
<script language=vbscript>msg.innertext="正在向sohu搜索引擎提交資料........"</script>
<form action="http://db.sohu.com/regurl/regform.asp" method=post name=sohu>
<input type=hidden name=SiteName value="<%response.write webname%>">
<input type=hidden name=URL value="<%response.write url%>">
<input type=hidden name=Description value="<%response.write oldintro%>">
<input type=hidden name=Keyword value="<%response.write keys%>">
<input type=hidden name=ClassKey value="<%response.write sohu_turn(cla)%>">
<input type="hidden" name="Step" value="Create">
</form>
<script language=vbscript>
document.sohu.submit
'msg.innertext="向sohu搜索引擎提交成功"
</script>
<%end if%>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -