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

📄 index.asp

📁 LoveDe 爱墙程序1.0 很好用的大家试试看
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%
OpenDB()

Dim sql,Rs,arrRs
Dim arrRsNumS,arrRsNumI
sql = "Select top 2000 cid,cdate,cauthor,ccontent,cbcolor,cfcolor from ccc_love order by cID DESC"
Set Rs = Conn.Execute(sql)

arrRs = Rs.GetRows

Rs.Close
Set Rs = Nothing
CloseDB()
arrRsNumS = UBound(arrRs,2)
%>
<html>
<head>
<title>--LoveDe许愿墙--</title>
<meta http-equiv="Pragma" content="no-cache" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="keyword" content=LoveDe 许愿 爱墙,网络爱墙,电子爱墙,爱情,生日,圣诞,情人节,新年,春节,祝福,礼物" />
<link rel="stylesheet" href="style0930.css" type="text/css" />
<style type="text/css">
<!--
body {
	margin-left: 5px;
	margin-top: 0px;
	margin-right: 5px;
	margin-bottom: 0px;
}
table {word-break:break-all;}
.tdb {
	background-image: url(images/love_04.jpg);
	background-repeat: no-repeat;
	background-position: right top;
}
td {
	font-size: 12px;
	color: #000000;
	line-height: 18px;
}
.white {
	color: #FFFFFF;
	text-decoration: none; 
}
//a:link {
	color: #FFFFFF;
}
a:visited {
	color: #FFFFFF;
}
a:active {
	color: #FF0000;
}
-->
</style>
<script language="JavaScript1.2">
//-- 控制层删除start of script -->
function ssdel(){
if (event)
{
lObj = event.srcElement ;

while (lObj && lObj.tagName != "DIV") lObj = lObj.parentElement ;
}
var id=lObj.id
     document.getElementById(id).removeNode(true);
     //document.getElementById(id).outerHTML="";//
  }

//-- 控制层删除End of script -->
</script>
<script>
//-- 控制层移动start of script -->
var Obj=''
var index=10000;//z-index;
document.onmouseup=MUp
document.onmousemove=MMove

function MDown(Object){
Obj=Object.id
document.all(Obj).setCapture()
pX=event.x-document.all(Obj).style.pixelLeft;
pY=event.y-document.all(Obj).style.pixelTop;
}

function MMove(){
if(Obj!=''){
 document.all(Obj).style.left=event.x-pX;
 document.all(Obj).style.top=event.y-pY;
 }
}

function MUp(){
if(Obj!=''){
 document.all(Obj).releaseCapture();
 Obj='';
 }
}
//-- 控制层移动end of script -->
//获得焦点;
function getFocus(obj)
{
       if(obj.style.zIndex!=index)
       {
               index = index + 2;
               var idx = index;
               obj.style.zIndex=idx;
               //obj.nextSibling.style.zIndex=idx-1;
       }
}
//查找祝福纸条
function Srch(obj)
{//alert(obj);
	if(obj.style.zIndex!=index)
	{
		index = index + 1000;
		var idx = index;
		obj.style.zIndex = idx;
		obj.style.width = 400;
		obj.style.height = 300;
		obj.style.left = 200;
		obj.style.top = 200;
	}
}
function ChkSrch()
{
if (SrchFrm.srchId.value == "")
	{alert("\n\n\n你总得告诉我查找哪一个吧!!\n\n\n");
	SrchFrm.srchId.focus();
	return false; }
return true;
}

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>
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/topbg.jpg">
  <tr>
    <td width="289" ><a href="index.asp"><img src="images/love_02.jpg" width="289" height="79" border="0" class="tdb" /></a></td>
    <td align="right" valign="bottom" class="tdb">
	<table width="300" border="0" cellspacing="4" cellpadding="0">
	<FORM name="SrchFrm" action="find.asp" onSubmit="return ChkSrch();">
      <tr>
        <td align="left" valign="bottom"><label>
			    <INPUT size=5 value="520" name="srchId" type="text" onKeyUp="checkNum(this);">号
			<INPUT type="submit" value="查找心愿纸条" style="background-color:#F33B78; border:1px outset #F33B78;color:#FFFFFF;font-weight:bold; "> 
        </label></td>
      </tr>
	  </FORM>
    </table></td>
  </tr>
</table>
<table width="100%" border="0" cellpadding="1" cellspacing="0" bgcolor="F33B78">
  <tr>
    <td><a href="input.htm"><img src="images/love_04.gif" width="153" height="20" border="0" /></a></td>
    <td align="right"><span class="white">&nbsp;&nbsp;&nbsp;&nbsp;将您的祝福语编辑填写好即可发布到本站许愿墙[发布许愿全部免费]&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;共有 <%=arrRsNumS+1%> 张祝福&nbsp;</span>&nbsp;</td>
  </tr>
</table>
<table width="100%" height="100%"  border="0" bgcolor="#FFE1EE">
  <tr>
    <td><%

For arrRsNumI = 0 To arrRsNumS

	Randomize

	LeftPx = Int((840-10+1)*Rnd+10)
	TopPx = Int((800-100+1)*Rnd+100)

	Response.write "<div id='cc"&arrRs(0,arrRsNumI)&"' class='Cccc' style='position:absolute;left:"&LeftPx&"px;top:"&TopPx&"px;background-color:"&arrRs(4,arrRsNumI)&";z-index:"&arrRs(0,arrRsNumI)&";' onmousedown='getFocus(this)'>"
	Response.write "<table border=0><td style='cursor:move;' width='98%' onmousedown=MDown(cc"&arrRs(0,arrRsNumI)&")>"&"第["&arrRs(0,arrRsNumI)&"]条&nbsp;"&FormatDateTime(arrRs(1,arrRsNumI),2)&"&nbsp;"&FormatDateTime(arrRs(1,arrRsNumI),4)&"</td><td style='cursor:hand;' onclick='ssdel()' width='2%'>×</td></tr><tr><td style='height:100px;padding:5px;' colspan='2'>"
	Response.write arrRs(3,arrRsNumI)
	Response.write "<div style='padding:5px;float:right;'>"&arrRs(2,arrRsNumI)&"</div></td></tr></table>"
	Response.write "</div>"
Next
%></td>
  </tr>
</table>
<table width="100%"  border="0" cellpadding="2" cellspacing="0">
  <tr>
    <td height="15" bgcolor="#F7387B"> <div align="center"><span class="white">Copyright ? 2007-2008 <a href="http://hi.baidu.com/byjian">BookBaBa.cn </a> All Right Reserved </span>
         <div style="display:none"><script language="javascript" type="text/javascript" src="http://js.users.51.la/1970307.js"></script></div>
    </div></td>
  </tr>
  <tr>
    <td height="15" bgcolor="#F7387B"> <div align="center"><a href="http://www.miibeian.gov.cn">京ICP备lveo号 </a> <span class="white">QQ:8675515</span> <a href="love.rar">程序下载</a></div></td>
  </tr>
</table>
</body></html>

⌨️ 快捷键说明

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