?? reg.asp
字號:
<!--#include file="Connections.asp" -->
<link rel="stylesheet" href="images/css.css" type="text/css">
<title>中華健康網--免費網站流量分析系統</title>
<body bgcolor="#e1e1e1" <%=background%>>
<TABLE width=569 height=327 border=0 align="center" cellPadding=0 cellSpacing=0
borderColor=#111111 class=ttbb
style="BORDER-RIGHT: 1px dotted; BORDER-TOP: 1px dotted; BORDER-LEFT: 1px dotted; BORDER-BOTTOM: 1px dotted; BORDER-COLLAPSE: collapse">
<TBODY>
<TR>
<TD style="POSITION: relative" width=569 bgColor=#ffffff colSpan=3 height=45><div id="9126" style="position:absolute; left:0px; top:-31px; border-style:none;"><img src="images/logo.gif" width="560" height="78" border="0"></div></TD>
</TR>
<tr align="center">
<td width=569 height=24 colspan=3 bgcolor=#0374b8><a href="reg.html"><font color="#FFFFFF">免費申請</font></a>
<a href="login.html"><font color="#FFFFFF">用戶登陸</font></a> <a href="code.html"><font color="#FFFFFF">統計代碼</font></a>
<a href="login.html?Error"><font color="#FFFFFF">總體數據</font></a> <a href="login.html?Error"><font color="#FFFFFF">詳細記錄</font></a>
<a href="login.html?Error"><font color="#FFFFFF">年統計</font></a> <a href="login.html?Error"><font color="#FFFFFF">月統計</font></a>
<a href="login.html?Error"><font color="#FFFFFF">周統計</font></a> <a href="login.html?Error"><font color="#FFFFFF">日統計</font></a>
<a href="login.html?Error"><font color="#FFFFFF">操作系統</font></a> <a href="index.html"><font color="#FFFFFF">系統幫助</font></a></td>
</tr>
<TR>
<TD vAlign=top width=569 bgColor=#66ccff height=194 rowSpan=2><P align=center><IMG height=260 src="images/free.gif" width=52 border=0></P>
<center>
<p>演 示<br>
<script src="/stat/count.asp?view=eyichang&fy=1"></script>
</center></TD>
<TD width=569 height=220 colSpan=2 valign="top" background="images/bg.gif" bgColor="#66ccff" class=bgimage>
<%if request("view")<>"" then
view=request("view")
url="?view="&view&""
end if
%>
<%tmpt = "http://" & request.servervariables("SERVER_NAME") & _
left(request.servervariables("SCRIPT_NAME"),len(request.servervariables("SCRIPT_NAME"))-len("reg.asp"))
sqlh="select count(*) as scount1 from vcount"
set rsh=conn.execute(sqlh)
total3=rsh("scount1")
set rsh=nothing
%>
<% function checkuser(fString)
fString=replace(fString,"'","‘")
checkuser = fString
end function
if request.querystring("action")="add" then
vuser=checkuser(trim(request.form("vuser")))
vuser1=checkuser(trim(request.form("vuser1")))
vpass=checkuser(trim(request.form("vpass")))
vtitle=checkuser(trim(request.form("vtitle")))
vurl=checkuser(trim(request.form("vurl")))
vemail=checkuser(request.form("vemail"))
vcontent=checkuser(request.form("vcontent"))
startcount=checkuser(trim(request.Form("startcount")))
error1=0
if total3>=maxcount or sopen<>0 then
error1=1
error2="用戶數已滿，或者管理員已經關閉統計申請,有什么問題請跟管理員聯系,"
end if
if vuser="" then
error1=1
error2=error2&"用戶名必須填寫,"
end if
if len(vuser)>12 then
error1=1
error2=error2&"用戶名不要超過12位,"
end if
if vpass="" then
error1=1
error2=error2&"密碼必須填寫,"
end if
if len(vpass)>12 then
error1=1
error2=error2&"密碼不要超過12位,"
end if
if vuser1="" then
error1=1
error2="站長名稱必須填寫,"
end if
if len(vuser1)>12 then
error1=1
error2=error2&"站長名稱不要超過12位,"
end if
if vtitle="" then
error1=1
error2=error2&"主頁名稱必須填寫,"
end if
if vurl="" then
error1=1
error2=error2&"主頁地址必須填寫,"
end if
if len(vcontent)>250 then
error1=1
error2=error2&"主頁簡介不要超過250位,"
end if
if startcount="" then
error1=1
error2=error2&"用本系統前的統計數字必須填寫,"
end if
if not IsNumeric(startcount) then
error1=1
error2=error2&"用本系統前的統計數字必須為數字,"
end if
sql="select * from vcount where vuser='"&vuser&"'"
set rs=conn.execute(sql)
if not rs.eof then
error1=1
error2=error2&"用戶名重復，請重新輸入,"
set rs=nothing
end if
if error1=1 then
response.redirect("?error2="&error2&"")
response.end
end if
strSql = "insert into vcount (vuser,vbanzhu,vpass,vurl,vtitle,vemail, startcount,vcontent) Values ('"
strSql = StrSQl & vuser & "','"
strSql = StrSQl & vuser1 & "','"
strSql = StrSQl & vpass & "','"
strSql = StrSQl & vurl & "','"
strSql = StrSQl & vtitle & "','"
strSql = StrSQl & vemail & "',"
strSql = StrSQl & startcount & ",'"
strSql = StrSQl & vcontent & "')"
conn.Execute (strsql)
response.redirect"reg.asp?action="&vuser&""
response.end
elseif request.querystring("action")="" then
if total3>=maxcount or sopen<>0 then
errornum1=1
errmsg=errmsg&"<BR>用戶數已滿，或者管理員已經關閉統計申請,有什么問題請跟管理員聯系<Br>當前共有 "&total3&" 位用戶申請本統計系統"
end if
if errornum1<>1 then
%>
<div align="center">
<center>
<table width=400 border=0 align=center cellPadding=1 cellSpacing=1 style="border-collapse: collapse" >
<form method="POST" action="reg.asp?action=add" name="form1" >
<tr valign="baseline">
<td align="right" colspan="2" class=tdc1> <div align="center"><strong><font color="#990000">申請資料</font></strong></div></td>
</tr>
<% if request.querystring("error2")<>"" then%>
<tr valign="baseline">
<td align="right" colspan="2" <%=hColor2%> class=tdc1> <div align="center"><%=request.querystring("error2")%></div></td>
</tr>
<% end if%>
<tr valign="baseline" >
<td nowrap align="right" class=tdc colspan="2">
<p align="center">注意事項：<br>
1：申請本站統計不得用于統計一切違法站點，違者發現一律刪除！<br>
2：本站統計只供參考，若數據出現丟失或者錯誤，本站不負責任！</td>
</tr>
<tr valign="baseline" >
<td nowrap align="right" class=tdc>*用戶名:</td>
<td class=tdc> <input type="text" name="vuser" value="" size="20">
</td>
</tr>
<tr valign="baseline">
<td nowrap align="right" class=tdc>*密碼:</td>
<td class=tdc> <input type="password" name="vpass" value="" size="20">
</td>
</tr>
<tr valign="baseline" >
<td nowrap align="right" class=tdc>*站長名稱:</td>
<td class=tdc> <input type="text" name="vuser1" value="" size="20">
</td>
</tr>
<tr valign="baseline">
<td nowrap align="right" class=tdc>Email:</td>
<td class=tdc> <input type="text" name="vemail" value="" size="25">
</td>
</tr>
<tr valign="baseline">
<td nowrap align="right" class=tdc>*主頁名稱:</td>
<td class=tdc> <input type="text" name="vtitle" value="" size="25">
</td>
</tr>
<tr>
<td nowrap align="right" class=tdc>主頁簡介:</td>
<td class=tdc> <textarea rows="5" name="vcontent" cols="35"></textarea>
</td>
</tr>
<tr valign="baseline">
<td nowrap align="right" class=tdc>*主頁地址:</td>
<td class=tdc> <input type="text" name="vurl" value="" size="35">
</td>
</tr>
<tr>
<td width="30%" class=tdc> <div align="right">用本系統前的統計數字：</div></td>
<td class=tdc> <input name="startcount" class=tdc size="8" value="0">
(用本系統前的統計數字) </td>
</tr>
<tr valign="baseline">
<td nowrap align="right" class=tdc> </td>
<td class=tdc> <input name="submit" type="submit" class=bdtj value="提交">
(當前共有 <%=total3%> 位用戶申請本統計系統) </td>
</tr>
</form>
</table>
</center>
</div>
<%else%>
<!--#include file="error.asp" -->
<%end if%>
<% elseif request.querystring("action")<>"" then%>
<div align="center">
<center>
<table width=400 border=0 align=center cellPadding=1 cellSpacing=1 style="border-collapse: collapse" >
<tr valign="baseline">
<td align="right" class=tdc1> <div align="center"><strong><font color="#990000">申請成功</font></strong></div></td>
</tr>
<tr valign="baseline">
<td class=tdc> <p align="center">你的申請已經提交成功，你只要將以下的一種代碼加在你的主頁上就可以實現統計了！
<p align="center"> 請記住你的用戶名和密碼，如果以后你的站點有所變動，你可以用此來更改<br>
<Br>
<b>效果演示：</b><BR>
代碼1演示
<script src="count.asp?view=vv365&fy=1"></script>
<br>
<br>
代碼2演示<br>
代碼2不顯示圖片，只是隱藏統計
<p align="center">
<textarea rows="8" name="S1" cols="35">連接代碼1：
<script src="<%=tmpt%>count.asp?view=<%=request.querystring("action")%>&fy=1"></script>
連接代碼2：
<script src="<%=tmpt%>count.asp?view=<%=request.querystring("action")%>&fy=2"></script></textarea>
<br>
<br>
請將以上代碼copy并保存好！！<br>
若你忘記了代碼，請到本統計系統的[用戶列表]欄目找到你站的名稱，點擊你站的名稱即可進入查看代碼。</p>
<P> </td>
</tr>
</table>
</center>
</div>
<%end if%>
</TD>
</TR>
<TR>
<TD align=right width=569 bgColor=#66ccff height=14></TD>
<TD align=right width=569 bgColor=#66ccff height=14><IMG height=20 src="images/bottomr.gif" width=20 border=0></TD>
</TR>
</TBODY>
</TABLE>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -