📄 _conn.asp

📁 最新许愿墙源代码v3.1喜欢的朋友下载吧！免费也有好东西
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Option Explicit
response.buffer=True

'/////////////////////////////////////////////////////
'// 程序: ASPK爱墙 1.5	 作者: 姬宏波	2007.10.07  //
'// 主页：www.aspk.net   邮箱: Jihongbo@gmail.com   //
'// 美化: 黑黑 2009.1.3	 主页: www.ppzcgg.cn        //
'/////////////////////////////////////////////////////

'爱墙名称
Const sitetitle="爱酷爱墙"

'爱墙关键字
Const sitekeywords="爱酷爱,爱墙,爱酷爱墙,许愿,心愿,贴字条"

'爱墙描述
Const sitedescription="通过“果果爱墙网站”把您的“果果爱”贴到“果果爱墙”上，让亿万网友和您一起分享您“爱的宣言”、“心的祝福”。"

'敏感字词过滤(,)
Const BAN_LIST="http,www,江泽民,胡锦涛,温家宝,共产党,法轮,fuck,操,sex,强奸,日你,性交,测试,test"

'发帖间隔时间(秒)
Const KEEP_TIME=10	

'首页显示条数
Const PAGE_SIZE=50

'列表显示条数
Const LOVE_SIZE=20

Dim db
	db="_lovewall.asa"	'数据库路径
Dim conn
	Set conn=server.CreateObject("ADODB.CONNECTION")
	conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db)
Sub Header(title)
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="robots" content="noodp">
<meta name="keywords" content="<%=sitekeywords%>" />
<meta name="description" content="<%=sitedescription%>" />
<title><%=sitetitle & title%> - www.gx-xinxi.cn</title>
<link href="images/style.css" rel="stylesheet" type="text/css" />
<script type="text/javascript" src="inc/common.js"></script>
</head>
<body>
<div style="display:none;" id="mask" onclick="Hide();"></div>
<div id="header">
	<div id="logo"><a href="default.asp"><img src="images/logo.jpg" alt="<%=sitetitle%>" /></a></div>
	<ul id="nav">
		<li id="nav_1"><a href="default.asp">首页</a></li>
		<li id="nav_2"><a href="add.asp">我要贴字条</a></li>
		<li id="nav_3"><a href="list.asp">字条列表</a></li>
		<li id="nav_4"><a href="http://www.gx-xinxi.cn/">QQ头像库</a></li>
		<li id="nav_5" class="theLastOne"><a href="http://www.gx-xinxi.cn/index1.asp">百宝箱</a></li>
	</ul>
	<form action="default.asp" onsubmit="return searchMsg();" id="searchBox">
		<span>字条搜索:</span>
		<input id="find" name="id" class="ipt" type="text" maxlength="10" size="13" value="输入字条编号" onclick="this.value='';" />
		<input type="submit" class="btn" value="搜索" />
	</form>
</div>
<%
End Sub
Sub Footer()
%>
<div id="footer">
	<div class="link"><span class="STYLE6 STYLE20"><font size="2">Copyright 
		2007-2009 <strong>gx-xinxi.cn</strong> Inc. <br>
		All Rights Reserved&nbsp;&nbsp;&nbsp; </font></span>
		<a target="_blank" href="http://www.miibeian.gov.cn">
		<font color="#003366" size="2">鲁ICP备09000053号</font></a></div>
	<div class="copy">　</div>
</div>
</body>
</html>
<%
End Sub
%>
⌨️ 快捷键说明

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