📄 fk.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<!--#include file="fuction.asp"-->
<html>
<head>
<title><%=webname%>--留言反馈</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!-- onMouseOver="window.status='【<%=webname%>】<%=weburl%> 如果您喜欢本站,别忘了把本站介绍给您的好友哦！：）';return true">-->
<!--#include file="webtop.asp"-->
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="1" bgcolor="C9C9C8"><img src="../images/block.gif" width="1" height="1"></td>
<td> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="168" valign="top">
<!--#include file="left.asp"-->
</td>
<td width="1" bgcolor="C9C9C8"><img src="images/block.gif" width="1" height="1"></td>
<td valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td background="images/bg1_4color_.jpg"><img src=images/bg1_4color_.jpg" width="1" height="3"></td>
</tr>
</table>
<%if ly="0" then%>
<FORM action=fksave.asp method=post name="form" id="form">
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td height="1" bgcolor="cccccc"><img src="images/dot_03.gif" width="9" height="1" border="0"></td>
</tr>
<tr>
<td height="25" bgcolor="efefef"> <strong> <img src="images/dot_03.gif" width="9" height="9" border="0">
</strong><strong>用户留言</strong></td>
</tr>
<tr>
<td height="1" bgcolor="cccccc"><img src="images/dot_03.gif" width="9" height="1" border="0"></td>
</tr>
</table>
<br>
<TABLE width="90%" border=0 align="center" cellPadding=0 cellSpacing=1>
<TBODY>
<TR>
<TD width="407" height="30"> 姓名：
<input name=name class="wenbenkuang" id="name"></TD>
</TR>
<TR>
<TD height="30"> OICQ：
<input name=qq class="wenbenkuang" id="qq">
性别：
<label>
<input name="sex" type="radio" value="boy" checked>
先生</label> <label>
<input type="radio" name="sex" value="girl">
小姐</label></TD>
</TR>
<TR>
<TD height="30"> 网址：
<input name=url class="wenbenkuang" id="url" value="http://">
邮箱：
<input name=email class="wenbenkuang" id="email"> </TD>
</TR>
<TR>
<TD height="30"> 留言内容：</TD>
</TR>
<TR>
<TD height="130" noWrap> <textarea name=content cols=60 rows=8 id="content" class="wenbenkuang"></textarea>
</TD>
<TR>
<TD height="30" colspan="2"> <input name="submit2" type=submit class="go-wenbenkuang" id="submit4" value=我要留言>
<input name="submit32" type=reset class="go-wenbenkuang" id="submit32" value=清除重来>
<%
Randomize '初始代随机数种子
num1=rnd() '产生随机数num1
num1=int(26*num1)+65 '修改num1的范围以使其是A-Z范围的Ascii码，以防表单名出错
session("antry")="test"&chr(num1) '产生随机字符串
%>
<input name="temp" type="hidden" id="temp" value="<%=session("antry")%>">
</TD>
</TR>
</TBODY>
</TABLE>
</FORM>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="98%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td height="1" bgcolor="cccccc"><img src="images/dot_03.gif" width="9" height="1" border="0"></td>
</tr>
<tr>
<td height="25" bgcolor="efefef">
<strong> <img src="images/dot_03.gif" width="9" height="9" border="0">
</strong><b>留言信息</b></td>
</tr>
<tr>
<td height="1" bgcolor="cccccc"><img src="images/dot_03.gif" width="9" height="1" border="0"></td>
</tr>
</table>
<table width="98%" border="0" align="center">
<tr>
<td align="center">
<%
Function unHtml(content)
ON ERROR RESUME NEXT
unHtml=content
IF content <> "" Then
unHtml=Server.HTMLEncode(unHtml)
unHtml=Replace(unHtml,vbcrlf,"<br>")
unHtml=Replace(unHtml,chr(9)," ")
unHtml=Replace(unHtml," "," ")
End IF
IF Err.Number <>0 Then
unHtml= "HTML转换中出错请联系管理员<br>"
Err.Clear
End IF
End Function
%>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_guestshop order by id desc",conn,3,2
%>
<SCRIPT language=JavaScript>
function is_number(str)
{
exp=/[^0-9()-]/g;
if(str.search(exp) != -1)
{
return false;
}
return true;
}
function CheckInput(){
if(form.name.value==''){
alert("您没有填写昵称！");
form.name.focus();
return false;
}
if(form.name.value.length>20){
alert("昵称不能超过20个字符！");
form.name.focus();
return false;
}
if(!is_number(document.form.qq.value)){
alert("QQ号必须是数字！");
form.qq.focus();
return false;
}
if(form.content.value==''){
alert("您没有填写留言内容！");
form.content.focus();
return false;
}
if(form.content.value.length>255){
alert("留言内容不能超过255个字符！");
form.content.focus();
return false;
}
return true;
}
</SCRIPT><br>
<%
if rs.eof and rs.bof then
%>
<table width="380" border="0" align="center" cellpadding="4" >
<tr>
<td height="40" align="center"> <p>还没有任何留言！</p></td>
</tr>
</table>
<%else%>
<%
rs.PageSize =5 '每页记录条数
iCount=rs.RecordCount '记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
per_page=rs.PageSize
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -