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

📄 index.asp

📁 后台管理用户:admin 密码:admin
💻 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)
if not rs.eof then
arrRs = Rs.GetRows
end if
Rs.Close
Set Rs = Nothing
CloseDB()
arrRsNumS = UBound(arrRs,2)
%>
<html>
<head>
<title>我们的爱,爱墙永铸,互联网上的爱墙,许愿墙 -By ieboke.com</title>
<meta http-equiv="Pragma" content="no-cache" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="keyword" content="许愿墙,爱墙,网络爱墙,电子爱墙,巴黎爱墙,爱情,生日,圣诞,情人节,新年,春节,祝福,礼物" />
<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; 
}
//-->
</style>

<SCRIPT LANGUAGE="javascript"> 
<!-- 
window.open ('/boke/') 
--> 
</SCRIPT>  

<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>
<script language="javascript">

function bookmark(){

window.external.AddFavorite('http://www.ieboke.com', '碧云网')

}

</script>
<script language="JavaScript">

 var msg  = "欢迎来到爱墙,写下你的祝福,记得常回来看看哦。碧云网 " ;

var interval = 120

var spacelen = 120;

var space10=" ";

var seq=0;

function Scroll() {

len = msg.length;

window.status = msg.substring(0, seq+1);

seq++;

if ( seq >= len ) { 

seq = 0; 

window.status = '';

window.setTimeout("Scroll();", interval );

}

else

window.setTimeout("Scroll();", interval );

} 

Scroll();

</script>


</head>
<body bgcolor="#fef4d9" onunload="bookmark()"> 
<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" alt="返回爱墙首页" width="289" height="79" border="0" class="tdb" /></a></td>
    <td align="right" valign="bottom" class="tdb"><div align="center">
      <table width="626" cellspacing="0">
        <tr>
          <td colspan="2"><div align="center">告诉你的好友本站的地址: www.ieboke.com &nbsp;&nbsp;碧云爱之墙的地址: love.ieboke.com</div></td>
        </tr>
        <tr>
          <td colspan="2">&nbsp;</td>
        </tr>
        <tr>
          <td width="357"><div align="center"><a href="javascript:window.external.AddFavorite('http://www.ieboke.com', '碧云网')" target="_blank">→点击这里收藏本站←</a> </div></td>
          <td width="263"><a href="http://www.ieboke.com" target="_blank">→点击进入碧云博客←</a> </td>
        </tr>
      </table>
    </div></td>
  </tr>
</table>
<table width="100%" border="0" cellpadding="1" cellspacing="0" bgcolor="F33B78">
  <tr>
    <td width="1%" height="20"> </td>
    <td width="25%" align="right"><span class="white"><a href="input.htm"><img src="images/love_04.gif" alt="点击这里发布你永久的祝福,永久的!" width="153" height="20" border="0" /></a></span></td>
    <td width="45%" align="right">
	
	<table border="0" cellpadding="0" cellspacing="0" width="100%" id="table2">
		<tr>
			<td width="191"><span class="white">
   
    &nbsp;&nbsp;←点击发布许愿←</span></td>
			<td width="250"><FORM name="SrchFrm" action="find.asp" onSubmit="return ChkSrch();">
			天赐字
			    <INPUT size=5 value="1" name="srchId" type="text" onKeyUp="checkNum(this);">号
			<INPUT type="submit" value="查找爱墙上的纸" style="background-color:#F33B78; border:1px outset #F33B78;color:#FFFFFF;font-weight:bold; "> 
           	  </FORM></td>
		</tr>
	</table>
	</td>
    <td width="17%" align="right"><span class="white">共有 <%=arrRsNumS+1%> 张祝福</span></td>
    <td width="11%" align="right"> </td>
  </tr>
</table>


<table border="0" cellpadding="0" cellspacing="0" width="100%" height="888" id="table3">
	<tr>
		<td height="888" background="images/bg.gif"> 
	  <%

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="1" cellspacing="0" bgcolor="F33B78">
  <tr>
    <td width="1%" height="20"> </td>
    <td width="25%" align="right"><span class="white"><a href="input.htm"><img src="images/love_04.gif" alt="点击这里发布你的祝福" width="153" height="20" border="0" /></a></span></td>
    <td width="45%" align="right">
      <table border="0" cellpadding="0" cellspacing="0" width="100%" id="table2">
        <tr>
          <td width="191"><span class="white"> &nbsp;&nbsp;[发布许愿全部免费]</span></td>
          <td width="250"><FORM name="SrchFrm" action="find.asp" onSubmit="return ChkSrch();">
              天赐字
                  <INPUT size=5 value="1" name="srchId2" type="text" onKeyUp="checkNum(this);">
                  <INPUT name="submit" type="submit" style="background-color:#F33B78; border:1px outset #F33B78;color:#FFFFFF;font-weight:bold; " value="查找爱墙上的纸">
          </FORM></td>
        </tr>
    </table></td>
    <td width="17%" align="right"><span class="white">共有 <%=arrRsNumS+1%> 张祝福</span></td>
    <td width="11%" align="right"> </td>
  </tr>
</table>
<DIV align=center></DIV>
<DIV align=center></DIV>


<table width="982" border="0" cellpadding="0" cellspacing="0">
  <!--DWLayoutTable-->
  <tr>
    <td width="982" height="68" valign="top" background="images/love_04.jpg"><DIV align=center>
      <DIV align=center></DIV>
    </DIV>
      <DIV align=center>
        <div id="copy"> <font color="#808080"><span class="tita1"><a href="/boke/" target="_blank"><br>
          碧云博客</a> - 广告服务 - 网站地图 - 帮助信息 - 联系方式</span></font><span class="tita1"><BR>
        Copyright &copy;&nbsp;<FONT size=2><FONT size=2>ieboke.com 碧云网 客服QQ:37704160</FONT>&nbsp; </font></span></div>
    </DIV></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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