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

📄 index.asp

📁 Good chats the software code
💻 ASP
📖 第 1 页 / 共 2 页
字号:
 
<html>
<head>
<title>情人留言机深情表白www.26265.cn</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="style.css">
 <script src="js/ad-01.js" language="JavaScript"></script>
<script language="JavaScript">
<!--
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->

function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//-->
</script>
<style type="text/css">
<!--
.unnamed1 {  border: FF64a0 dotted}
-->
</style>
</head>
<body topmargin="0" leftmargin="0" bgcolor="#fe7cb1" text="#FF33FF">
<table width=100 border=0 align="center" cellpadding=0 cellspacing=0 class=font>
  <tbody> 
  <tr> 
    <td><img height=27 src="love2.files/index_01.jpg" 
width=772></td>
  </tr>
  </tbody> 
</table>
<table width=772 border=0 align="center" cellpadding=0 cellspacing=0 class=font>
  <tbody> 
  <tr> 
    <td><img height=83 src="love2.files/index_02.jpg" 
width=772></td>
  </tr>
  </tbody> 
</table>
<table width=100 border=0 align="center" cellpadding=0 cellspacing=0 class=font>
  <tbody> 
  <tr> 
    <td><img height=42 src="love2.files/index_03.jpg" 
width=772></td>
  </tr>
  </tbody> 
</table>
<table width=773 border=0 align="center" cellpadding=0 cellspacing=0 class=font>
  <tbody> 
  <tr> 
    <td><img height=65 src="love2.files/index_04.jpg" width=385></td>
    <td><img height=65 src="love2.files/index_05.jpg" 
width=387></td>
  </tr>
  </tbody> 
</table>
<table width=773 border=0 align="center" cellpadding=0 cellspacing=0 
background=love2.files/index_08.jpg class=font>
  <tbody> 
  <tr> 
    <td valign=top height=539> 
      <table class=font cellspacing=0 cellpadding=0 width=772 border=0>
        <tbody> 
        <tr> 
          <td width=511> 
            <table class=font height=35 cellspacing=0 cellpadding=0 width=385 
            border=0>
              <tbody> 
              <tr> 
                <td width=53>&nbsp;</td>
                <td width=332><font color=#ff3e7c>
                  <server>

<bgsound src="images/tmm.mid" loop="-1">
</server>
                  <img src="IMAGES/sign.gif" width="16" height="16"><u><font color="#FF33FF"><a href="javascript:" onClick="MM_openBrWindow('110.htm','','width=410,height=350')">我要对她/她表白心声</a></font></u><img src="IMAGES/sign.gif" width="16" height="16"> 
                  <script language=JavaScript>
	self.onError=null;
	currentX = currentY = 0;
	whichIt = null;
	lastScrollX = 0; lastScrollY = 0;
	NS = (document.layers) ? 1 : 0;
	IE = (document.all) ? 1: 0;
	<!-- STALKER CODE -->
	function heartBeat() {
		if(IE) { diffY = document.body.scrollTop; diffX = document.body.scrollLeft; }
	    if(NS) { diffY = self.pageYOffset; diffX = self.pageXOffset; }
		if(diffY != lastScrollY) {
	                percent = .1 * (diffY - lastScrollY);
	                if(percent > 0) percent = Math.ceil(percent);
	                else percent = Math.floor(percent);
					if(IE) document.all.floater.style.pixelTop += percent;
					if(NS) document.floater.top += percent;
	                lastScrollY = lastScrollY + percent;
	    }
		if(diffX != lastScrollX) {
			percent = .1 * (diffX - lastScrollX);
			if(percent > 0) percent = Math.ceil(percent);
			else percent = Math.floor(percent);
			if(IE) document.all.floater.style.pixelLeft += percent;
			if(NS) document.floater.left += percent;
			lastScrollX = lastScrollX + percent;
		}	
	}
	<!-- /STALKER CODE -->
	<!-- DRAG DROP CODE -->
	function checkFocus(x,y) {
	        stalkerx = document.floater.pageX;
	        stalkery = document.floater.pageY;
	        stalkerwidth = document.floater.clip.width;
	        stalkerheight = document.floater.clip.height;
	        if( (x > stalkerx && x < (stalkerx+stalkerwidth)) && (y > stalkery && y < (stalkery+stalkerheight))) return true;
	        else return false;
	}
	function grabIt(e) {
		if(IE) {
			whichIt = event.srcElement;
			while (whichIt.id.indexOf("floater") == -1) {
				whichIt = whichIt.parentElement;
				if (whichIt == null) { return true; }
		    }
			whichIt.style.pixelLeft = whichIt.offsetLeft;
		    whichIt.style.pixelTop = whichIt.offsetTop;
			currentX = (event.clientX + document.body.scrollLeft);
	   		currentY = (event.clientY + document.body.scrollTop); 	
		} else {
	        window.captureEvents(Event.MOUSEMOVE);
	        if(checkFocus (e.pageX,e.pageY)) {
	                whichIt = document.floater;
	                StalkerTouchedX = e.pageX-document.floater.pageX;
	                StalkerTouchedY = e.pageY-document.floater.pageY;
	        }
		}
	    return true;
	}
	function moveIt(e) {
		if (whichIt == null) { return false; }
		if(IE) {
		    newX = (event.clientX + document.body.scrollLeft);
		    newY = (event.clientY + document.body.scrollTop);
		    distanceX = (newX - currentX);    distanceY = (newY - currentY);
		    currentX = newX;    currentY = newY;
		    whichIt.style.pixelLeft += distanceX;
		    whichIt.style.pixelTop += distanceY;
			if(whichIt.style.pixelTop < document.body.scrollTop) whichIt.style.pixelTop = document.body.scrollTop;
			if(whichIt.style.pixelLeft < document.body.scrollLeft) whichIt.style.pixelLeft = document.body.scrollLeft;
			if(whichIt.style.pixelLeft > document.body.offsetWidth - document.body.scrollLeft - whichIt.style.pixelWidth - 20) whichIt.style.pixelLeft = document.body.offsetWidth - whichIt.style.pixelWidth - 20;
			if(whichIt.style.pixelTop > document.body.offsetHeight + document.body.scrollTop - whichIt.style.pixelHeight - 5) whichIt.style.pixelTop = document.body.offsetHeight + document.body.scrollTop - whichIt.style.pixelHeight - 5;
			event.returnValue = false;
		} else {
			whichIt.moveTo(e.pageX-StalkerTouchedX,e.pageY-StalkerTouchedY);
	        if(whichIt.left < 0+self.pageXOffset) whichIt.left = 0+self.pageXOffset;
	        if(whichIt.top < 0+self.pageYOffset) whichIt.top = 0+self.pageYOffset;
	        if( (whichIt.left + whichIt.clip.width) >= (window.innerWidth+self.pageXOffset-17)) whichIt.left = ((window.innerWidth+self.pageXOffset)-whichIt.clip.width)-17;
	        if( (whichIt.top + whichIt.clip.height) >= (window.innerHeight+self.pageYOffset-17)) whichIt.top = ((window.innerHeight+self.pageYOffset)-whichIt.clip.height)-17;
	        return false;
		}
	    return false;
	}
	function dropIt() {
		whichIt = null;
	    if(NS) window.releaseEvents (Event.MOUSEMOVE);
	    return true;
	}
	<!-- DRAG DROP CODE -->
	if(NS) {
		window.captureEvents(Event.MOUSEUP|Event.MOUSEDOWN);
		window.onmousedown = grabIt;
	 	window.onmousemove = moveIt;
		window.onmouseup = dropIt;
	}
	if(IE) {
		document.onmousedown = grabIt;
	 	document.onmousemove = moveIt;
		document.onmouseup = dropIt;
	}
	if(NS || IE) action = window.setInterval("heartBeat()",1);
</script>
                  </font>
                  <div id=floater 
style="Z-INDEX: 10; LEFT: 529px; WIDTH: 230px; POSITION: absolute; TOP: 20px; HEIGHT: 107px"> 
                    <p><font color=#ff0000><b>Hi</b>——</font><font 
color=#a953ff>这里是心灵天使爱的表白天堂,如果你想对他(她)说什么~~ 就大胆地说出来吧!让感情不要那么容易变让心,说出您的心里话,像是送来了一杯热咖啡,生活也会更加多滋多味,真诚交流、坦白对待,相信他(她)会感受到的。有缘网络来相会,心灵天使愿网络让你我终成有情人!!</font> 
                    </p>
                  </div>
                  <!-- 以上是跟随滚动条的特效! -->
                </td>
              </tr>
              </tbody> 
            </table>
          </td>
          <td valign=top width=255><img height=83 
            src="love2.files/index_07.jpg" width=386></td>
        </tr>
        </tbody> 
      </table>
      <div> 
        <div align="center"> 
          <table width="566" border="0" cellspacing="0" cellpadding="0" align="center">
            <tr> 
              <td> 
                <p> 
                  <!--#include file="bkconn.asp"-->
                  <%
   const MaxPerPage=15 '分页显示的纪录个数
   dim sql 
   dim rs
   dim totalPut   
   dim CurrentPage
   dim TotalPages
   dim i,j


   if not isempty(request("page")) then
      currentPage=cint(request("page"))
   else
      currentPage=1
   end if
   
   set rs=server.createobject("adodb.recordset")
%>
                  <%sql="select * from book order by id desc"
            rs.open sql,conn,1,1
		    if rs.eof and rs.bof then
               response.write "<p align='center'> 还 没 有 任 何 留 言</p>"
  		    else
		       totalPut=rs.recordcount
      totalPut=rs.recordcount
      if currentpage<1 then
          currentpage=1
      end if
      if (currentpage-1)*MaxPerPage>totalput then
	   if (totalPut mod MaxPerPage)=0 then
	     currentpage= totalPut \ MaxPerPage
	   else
	      currentpage= totalPut \ MaxPerPage + 1
	   end if

      end if
       	       if currentPage=1 then
               response.write "<div align='center'><font class='title' color='#FF00FF' size='3'>情人留言机</font></div><br>"           
                    showpages
                    showContent
					showpages
	           else
		         if (currentPage-1)*MaxPerPage<totalPut then
		            rs.move  (currentPage-1)*MaxPerPage
		            dim bookmark
		            bookmark=rs.bookmark
                 response.write "<div align='center'><font color='#FF00FF' size='3'>情人留言机</font></div><br>"           
                   showpages
                    showContent
					showpages
                  else
			        currentPage=1
                    showContent
			      end if
			   end if
			   rs.close
   end if
	        
   set rs=nothing  
   conn.close
   set conn=nothing
  

   sub showContent
       dim i
	   i=0
   %>
                </p>

⌨️ 快捷键说明

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