find.asp

来自「后台管理用户:admin 密码:admin」· ASP 代码 · 共 250 行

ASP
250
字号

<!--#include file="conn.asp"-->
<%
OpenDB()

Dim sql,Rs,arrRs
Dim arrRsNumS,arrRsNumI
dim srchId
srchId=request.querystring("srchId")
sql = "Select cid,cdate,cauthor,ccontent,cbcolor,cfcolor from ccc_love where cid=0"&srchId

Set Rs = Conn.Execute(sql)

if rs.BOF and rs.EOF then
Response.Write "<script>alert('没有找到你要得爱情留言!');location.href='index.asp';</script>"
response.end
else
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">

 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>
<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" 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', '碧云网')">→点击这里收藏本站←</a> </div></td>
            <td width="263"><a href="javascript:window.external.AddFavorite('http://www.ieboke.com', '碧云网')">→点击进入碧云博客←</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="182"><span class="white"> &nbsp;&nbsp;←发布许愿全部免费←</span></td>
          <td width="267"><FORM name="SrchFrm" action="find.asp" onSubmit="return ChkSrch();">
              天赐字
                  <INPUT size=5 value="1" name="srchId" 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>
<%
	LeftPx = 400
	TopPx = 200

	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>"
%>

</body></html>

⌨️ 快捷键说明

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