⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 add.asp

📁 上海数字留言簿系统2.1版 软件语言: 简体中文 授权方式: 免费版 文件大小: 211K 系统平台: ASP+ACCESS 整理日期: 2007-8-21 系统简介: 上海数
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="ubbcode.asp"-->
<!--#include file="top.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from guestbook order by id desc"
rs.open sql,db,3,2
dim pagenum
dim e_page
e_page=6 '每页显示留言数
rs.pagesize=e_page
if request.querystring("pagenum")="" or request.querystring("pagenum")=0 then
pagenum=1
else
pagenum=request.querystring("pagenum")
rs.absolutepage=trim(request.querystring("pagenum"))
end if
%>
<SCRIPT language=JavaScript>

function is_number(str)
{
	exp=/[^0-9()-]/g;
	if(str.search(exp) != -1)
	{
		return false;
	}
	return true;
}
function is_email(str)
{ if((str.indexOf("@")==-1)||(str.indexOf(".")==-1))
{
	
	return false;
	}
	return true;
}

function CheckInput(){

	if(form.name.value==''){
		alert("请填写您的留言昵称!");
		form.name.focus();
		return false;
	}
	if(form.name.value.length>30){
		alert("昵称不能超过30个字符!");
		form.name.focus();
		return false;
	}

	if(!is_number(document.form.qq.value)){
		alert("QQ号只能是数字哦!");
		form.qq.focus();
		return false;
	}

	if( form.email.value =="") {
                alert("请输入您的E-mail !")
		form.email.focus();
        return false;
    }

	if(!is_email(form.email.value))
	{ alert("您的EMail地址是错误的!");
		form.email.focus();
	return false;
	}

	if(form.title.value==''){
		alert("请您填写留言标题!");
		form.title.focus();
		return false;
	}
	if(form.title.value.length>50){
		alert("留言标题不能超过50个字符!");
		form.title.focus();
		return false;
	}

	if(form.content.value==''){
		alert("您没有填写留言内容!");
		form.content.focus();
		return false;
	}
	if(form.content.value.length>500){
		alert("留言内容超过500个字符!");
		form.content.focus();
		return false;
	}
	
	return true;
}
</SCRIPT><link href="style.css" rel="stylesheet" type="text/css">

<BGSOUND id=backwav src="" loop=0>
<BODY>
<CENTER>
  <a name="top"></a>
  <a name="add"></a> 
    <table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td>
  <table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td><img src="images/bgtop.gif" width="760" height="15"></td>
    </tr>
  </table>
  <table width="760" border="0" align="center" cellpadding="0" cellspacing="0" background="images/bgpic.gif" height="805">
    <tr>
      <td width="200" valign="top">
<table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr> 
            <td height="15">&nbsp;</td>
          </tr>
          <tr> 
            <td height="15"> <div align="center"><strong><font color="#333333">..:: 
                留 言 操 作 ::..</font></strong></div></td>
          </tr>
          <tr> 
            <td><div align="center"><br>
				<img border="0" src="images/n22.gif" width="60" height="54"></div></td>
          </tr>
          <tr> 
            <td><div align="center"><a href="add.asp"><img src="images/add.gif" border="0"></a></div></td>
          </tr>
          <tr> 
            <td height="20"><div align="center"></div></td>
          </tr>
          <tr> 
            <td height="20"> <div align="center">
				<img border="0" src="images/n11.gif" width="60" height="54"></div></td>
          </tr>
          <tr> 
            <td><div align="center"><a href="login.asp"><img src="images/admin.gif" width="100" height="30" border="0"></a></div></td>
          </tr>
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td> </td>
          </tr>
          <tr> 
            <td><div align="center"> 
                <%if session("admin")<>"smallstick" then%>
                <p><a href="logout.asp"> 
                  <%else%>
                  </a> 
				<img border="0" src="images/n14.gif" width="60" height="54"><br>
                  <a href="notice.asp"><img src="images/new.gif" border="0"></a><br>
				<br>
				<img border="0" src="images/n7.gif" width="60" height="54"><br>
				<a href="change.asp">
				<img border="0" src="images/password.jpg" width="100" height="30"></a></p>
				<img border="0" src="images/n22.gif" width="60" height="54"><br>
				<a href="ad.asp">
				<img border="0" src="images/001.gif" width="100" height="30"></a><br>
 </p>

                <img border="0" src="images/n24.gif" width="60" height="54"><br>
                <a href="logout.asp"><img src="images/logout.gif" border="0"><strong> 
                <%end if%>
                </strong></a> </div></td>
          </tr>
          <tr> 
            <td height="50"> </td>
          </tr>
          <tr> 
            <td><div align="center"><strong><font color="#333333">..:: 留 言 说 明 
                ::..</font></strong></div></td>
          </tr>
          <tr> 
            <td><div align="center"> 
                <table width="70%" border="0" cellpadding="0" cellspacing="0">
                  <tr> 
                    <td> </td>
                  </tr>
                  <tr> 
                    <td><font color="#666666">1.本留言板为访客发表对本站的意见想法,并非灌水区!</font></td>
                  </tr>
                  <tr> 
                    <td><font color="#666666">&nbsp;</font></td>
                  </tr>
                  <tr> 
                    <td><font color="#666666">2.由于留言过多,站长只对部分留言进行回复!</font></td>
                  </tr>
                  <tr> 
                    <td><font color="#666666">&nbsp;</font></td>
                  </tr>
                  <tr> 
                    <td><font color="#666666">3.本留言板中留言内容为留言者个人意思,不代表本站立场,未经同意不得转贴贴!</font></td>
                  </tr>
                  <tr> 
                    <td><p> </p></td>
                  </tr>
                </table>
              </div></td>
          </tr>
          <tr> 
            <td><div align="center"></div></td>
          </tr>
        </table></td>
      <td width="30"> </td>
      <td width="530" align="center" valign="top"><br> 
<TABLE  cellSpacing=4 cellPadding=0 
                  width="530" border=0>
          <TBODY>
            <TR> 
              <TD align="center"> <FORM action="save.asp" method=post name=form onsubmit=return(CheckInput())>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -