📄 regsta2.asp
字号:
<%Option Explicit%>
<%Response.Expires = 0%>
<%
if Request.TotalBytes > 6000 then
Response.Write("提交数据不能多于 3 K")
Response.End
end if
%>
<%
dim title,url,comments,name,lang,email,regsitename,regsiteabout,regsitearea
dim sortid
dim pathname,IsErr
dim infotime,infoname,infoqy
sortid = Request.Form("sortid")
pathname = Request.Form("pathname")
title = replace(Request.Form("title"),"""","“")
title = replace(title,"&","＆")
regsitename = replace(Request.Form("regsitename"),"""","“")
regsitename = replace(regsitename,"&","＆")
url = replace(Request.Form("url"),"""","“")
url = replace(url,"&","＆")
comments = replace(Request.Form("comments"),"""","“")
comments = replace(comments,"&","＆")
infotime = replace(Request.Form("infotime"),"""","“")
infotime = replace(infotime,"&","＆")
infoname = replace(Request.Form("infoname"),"""","“")
infoname = replace(infoname,"&","＆")
infoqy = replace(Request.Form("infoqy"),"""","“")
infoqy = replace(infoqy,"&","＆")
regsiteabout = replace(Request.Form("regsiteabout"),"""","“")
regsiteabout = replace(regsiteabout,"&","＆")
name = replace(Request.Form("name"),"""","“")
name = replace(name,"&","＆")
regsitearea = replace(Request.Form("regsitearea"),"""","“")
regsitearea = replace(regsitearea,"&","＆")
lang = replace(Request.Form("lang"),"""","“")
lang = replace(lang,"&","＆")
email = replace(Request.Form("email"),"""","“")
if Trim(title) = "" or Trim(url) = "" or Trim(comments) = "" then
Response.Write("<script language=""JavaScript"">alert(""请您填写完整的网站信息，谢谢您对本站工作的支持！"");history.go(-1);</script>")
Response.End
elseif title <> Server.HTMLEncode(title) or comments <> Server.HTMLEncode(comments) or name <> Server.HTMLEncode(name) then
Response.Write("<script language=""JavaScript"">alert(""请勿包含ＨＴＭＬ标记！"");history.go(-1);</script>")
Response.End
end if
if Trim(name) = "" then name = " 未知 "
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>第二步：确认信息</title>
<link href="com2008.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" bgcolor="#FFFFFF" topmargin="0">
<!--#include file="include-top.htm"-->
<table border=0 cellpadding=0 cellspacing=0 width=1002 align="center">
<tbody>
<tr>
<td width=639 align="center" valign=top>
<p align="center">
<p><b>请确认您提交的信息</b></p>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td> <form action="regsta3.asp" method="post" id=form1 name=form1>
<input type="hidden" name="sortid" value="<%=sortid%>">
<input type="hidden" name="pathname" value="<%=Server.HTMLEncode(pathname)%>">
<input type="hidden" name="title" value="<%=title%>">
<input type="hidden" name="url" value="<%=url%>">
<input type="hidden" name="lang" value="<%=lang%>">
<input type="hidden" name="comments" value="<%=comments%>">
<input type="hidden" name="infotime" value="<%=infotime%>">
<input type="hidden" name="infoname" value="<%=infoname%>">
<input type="hidden" name="infoqy" value="<%=infoqy%>">
<input type="hidden" name="name" value="<%=name%>">
<input type="hidden" name="email" value="<%=email%>">
<input type="hidden" name="regsitename" value="<%=regsitename%>">
<input type="hidden" name="regsiteabout" value="<%=regsiteabout%>">
<input type="hidden" name="regsitearea" value="<%=regsitearea%>">
<br>
<blockquote>
<dd>
<table width="700" border="0" cellspacing="0" cellpadding="8">
<tr>
<td width="81" valign="top"><b>信息标题</b></td>
<td width="587"><%=title%></td>
</tr>
<tr>
<td valign="top"><b>信息类型</b></td>
<td width="587"><%=lang%> 信息有效期<%=infotime%>天</td>
</tr>
<tr>
<td valign="top"><b>信息内容</b></td>
<td><u><%=comments%></u></td>
</tr>
<tr>
<td valign="top"><b>公司信息</b></td>
<td><u><%=regsiteabout%></u></td>
</tr>
<tr>
<td valign="top"><b>网站地址</b></td>
<td><u><%=url%></u></td>
</tr>
<tr>
<td valign="top"><b>公司名称</b></td>
<td><u><%=regsitename%></u></td>
</tr>
<tr>
<td valign="top"><b>联系地址</b></td>
<td><u><%=name%></u></td>
</tr>
<tr>
<td valign="top"><b>所在区域</b></td>
<td><u><%=infoqy%></u></td>
</tr>
<tr>
<td valign="top"><b>联系人</b></td>
<td><u><%=infoname%></u></td>
</tr>
<tr>
<td valign="top"><b>联系电话</b></td>
<td><u><%=regsitearea%></u></td>
</tr>
<tr>
<td valign="top"><b>Email</b></td>
<td><u><%=email%></u></td>
</tr>
<tr>
<td valign="top"> </td>
<td> </td>
</tr>
<tr>
<td valign="top"> </td>
<td><input type="submit" value=" 确定 " name="submit">
<input type="button" value=" 修改 " onClick="history.go(-1)" name="button">
</td>
</tr>
</table>
<br>
<dd>
</blockquote>
</form></td>
</tr>
</table></td>
</tr>
</tbody>
</table>
<br>
<!--#include file="buttom.asp"-->
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -