📄 admin_setup.asp

📁 爱情许愿墙
💻 ASP
字号:
<!--#include file="../Conn.asp"-->
<!--#include file="Admin_Session.asp"-->
<%
IF Session("Rank")="" Or Session("Rank")>3 Then
  Response.Write "<script language='javascript'>alert('你没权限操作！');location='Admin_Main.asp';</script>"
  Response.End()
End If
Dim Rs,Sql,Action
Action=Trim(Request("Action"))
Set Rs=server.CreateObject("Adodb.recordset")
Sql="Select * From Kukoo_Config Where Kukoo_ConfigID=1"
Rs.Open Sql,Conn,1,3
IF Action="Save" Then
    Kukoo_WishName=Trim(Request("Kukoo_WishName"))
	Kukoo_IndexNum=Trim(Request("Kukoo_IndexNum"))
	Kukoo_WishPage=Trim(Request("Kukoo_WishPage"))
	Kukoo_KeyWord=Trim(Request("Kukoo_KeyWord"))
	Kukoo_Descrip=Trim(Request("Kukoo_Descrip"))
	seconds=Clng(Trim(Request("seconds")))
	ad=Trim(Request("ad"))
    Rs("Kukoo_WishName")=Kukoo_WishName
	Rs("Kukoo_IndexNum")=Kukoo_IndexNum
	Rs("Kukoo_WishPage")=Kukoo_WishPage
	Rs("Kukoo_KeyWord")=Kukoo_KeyWord
	Rs("Kukoo_Descrip")=Kukoo_Descrip
	Rs("seconds")=seconds
	Rs("ad")=ad
	Rs.Update()
	Response.Write "<script language='javascript'>alert('修改成功！');location='Admin_Setup.asp';</script>"
End if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/style.css" rel="stylesheet" type="text/css">

<script language="javascript">
function checkNum(obj){
	var checkOK = "0123456789 ";
	var checkStr = obj.value;
	var allValid = true;
	for (i = 0;  i < checkStr.length;  i++){
		ch = checkStr.charAt(i);
		for (j = 0;  j < checkOK.length;  j++)
		if (ch == checkOK.charAt(j))
			break;
		if (j == checkOK.length){
			allValid = false;
			break;
		}
	}
	if (!allValid){
		alert("只能由数字组成！");
		obj.select();
		return (false);
	}
	return (true);	
}
</script> 
</head>
<body>
<div align="center">

  <table cellpadding="3" cellspacing="1" border="0" width="100%" class="tableBorder" align=center>
    
	<tr> 
      <th class="tableHeaderTex" height=50>网站初始设置</th>
    </tr>
	
    <tr> 
      <td align="center"  class="forumRowHighlight"> 
 
	  <form name="SetUp" method="post" action="?Action=Save">
	     
		
    <table width="90%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
          <td width="23%" height="30" align="right" class="forumRowHighlight">
		网站名称：		   </td>
          <td width="77%" height="30" class="forumRowHighlight"><input name="Kukoo_WishName" type="text" id="Kukoo_WishName" value="<%=Rs("Kukoo_WishName")%>" size="50">
            (* 系统名称Eg：Kukoo爱情许愿墙)</td>
      </tr>
		   <tr>
          <td height="30" align="right" class="forumRowHighlight">
		首页显示条数：		   </td>
          <td height="30" class="forumRowHighlight"><input name="Kukoo_IndexNum" type="text" id="Kukoo_IndexNum" onBlur="return checkNum(this);" value="<%=Rs("Kukoo_IndexNum")%>" size="10">
            （* 在首页显示多少条许愿纸条）</td>
		   </tr>
		   <tr>
          <td height="30" align="right" class="forumRowHighlight">
		每页显示条数：		   </td>
          <td height="30" class="forumRowHighlight"><input name="Kukoo_WishPage" type="text" id="Kukoo_WishPage" onBlur="return checkNum(this);" value="<%=Rs("Kukoo_WishPage")%>" size="10">
            （* 在列表页显示多少条许愿纸条）</td>
		   </tr>
		   <tr>
          <td height="30" align="right" class="forumRowHighlight">
		间隔时间(秒)：		   </td>
          <td height="30" class="forumRowHighlight"><input name="seconds" type="text" id="seconds" onBlur="return checkNum(this);" value="<%=Rs("seconds")%>" size="10">
            （* 修改发贴、搜索等操作间隔时间(秒)）</td>
		   </tr>
		   <tr>
          <td height="30" align="right" class="forumRowHighlight">
		公告：		   </td>
          <td height="30" class="forumRowHighlight"><input name="ad" type="text" id="ad" onBlur="return checkNum(this);" value="<%=Rs("ad")%>" size="10">
            （* 修改发贴、搜索等操作间隔时间(秒)）</td>
		   </tr>
		   <tr>
          <td height="30" align="right" class="forumRowHighlight">
		网站关键字：		   </td>
          <td height="30" class="forumRowHighlight"><textarea name="Kukoo_KeyWord" cols="50" rows="6" id="Kukoo_KeyWord"><%=Rs("Kukoo_KeyWord")%></textarea>
            （* 网站关键字SEO使用）</td>
		   </tr>
		   <tr>
          <td height="24" align="right" class="forumRowHighlight">网站描述： </td>
          <td height="24" class="forumRowHighlight"><textarea name="Kukoo_Descrip" cols="50" rows="6" id="Kukoo_Descrip"><%=Rs("Kukoo_Descrip")%></textarea>
            （* 网站描述SEO使用）</td>
		   </tr>
        <tr>
          <td height="30" colspan="2" align="center" class="forumRowHighlight">
		  <input name="Submit" type="submit" class="button" id="Submit" onClick="return SubmitForm();" value="提交">
          &nbsp;&nbsp;
              <input name="Reset" type="reset" class="button" onClick="return SubmitFormNclass();" value="重置"></td>
          </tr>
    </table>
	</form>
	</td>
  </tr>
</table>
</div>
</body>
</html>
<%
Rs.Close:Set Rs=Nothing
Call ConnClose()
%>
⌨️ 快捷键说明

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