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

📄 book.asp

📁 功能最强大的ASP网站
💻 ASP
字号:
<!--#include file="conn.asp" -->
<SCRIPT language=JavaScript>
var t_id = setInterval(animate,20);
var pos=0;
var dir=2;
var len=0;
function animate(){
 var elem = document.getElementById('progress');
 if(elem != null) {
  if (pos==0) len += dir;
  if (len>32 || pos>148) pos += dir;
  if (pos>148) len -= dir;
  if (pos>148 && len==0) pos=0;
  elem.style.left = pos;
  elem.style.width = len;
 }
}
function remove_loading() {
 this.clearInterval(t_id);
 var targelem = document.getElementById('loader_container');
 targelem.style.display='none';
 targelem.style.visibility='hidden';
}
</SCRIPT>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>gbook</title>
<style type="text/css">
<!--
.STYLE1 {	color: #0099CC;
	font-size: 10px;
	font-family: Arial, Helvetica, sans-serif;
}
-->
</style>
<link href="../../css/css.css" rel="stylesheet" type="text/css" />
<style type="text/css">
<!--
#loader { BORDER-RIGHT: #99cc00 1px solid; PADDING-RIGHT: 0px; BORDER-TOP: #99cc00 1px solid; DISPLAY: block; PADDING-LEFT: 0px; FONT-SIZE: 11px; Z-INDEX: 10; PADDING-BOTTOM: 16px; MARGIN: 0px auto; BORDER-LEFT: #99cc00 1px solid; WIDTH: 200px; COLOR: #000000; PADDING-TOP: 10px; BORDER-BOTTOM: #99cc00 1px solid; FONT-FAMILY: Tahoma, Helvetica, sans; BACKGROUND-COLOR: #ffffff; TEXT-ALIGN: left;
}
#loader_bg { FONT-SIZE: 1px; LEFT: 8px; WIDTH: 180px; POSITION: relative; TOP: 8px; HEIGHT: 12px; BACKGROUND-COLOR: #e4e7eb;
}
#progress { FONT-SIZE: 1px; LEFT: 0px; WIDTH: 1px; POSITION: relative; TOP: 1px; HEIGHT: 10px; BACKGROUND-COLOR: #009900;
}
#Layer1 {
	position:absolute;
	width:206px;
	height:88px;
	z-index:1;
	left: 430px;
	top: 16px;
	background-color: #FFFFFF;
}
-->
</style>
</head>

<body onload=remove_loading()>
<table align=center><DIV id=loader_container><DIV id=loader>
  <DIV align=center class="STYLE3">loading gbook system...</DIV>
  <DIV id=loader_bg>
   <DIV id=progress></DIV>
  </DIV>
 </DIV></div></table>
<table width="100%" border="0" class="tb1">

  <%
      classname=request("classname")  
	  Set rsn = Server.CreateObject ("ADODB.Recordset")
                 sqln = "Select * from bigclass where bigclassname='"&classname&"'"
				 
                 rsn.Open sqln,conn,1,1
				 if rsn.eof and rsn.bof then
				 response.Write("shangdu copyright 2007")
				 else
	  %>
  <tr>
    <td background="images/bg.png" class="STYLE1"><table width="100%" border="0" class="tb1">
        <tr>
          <td width="10%" rowspan="5"><div align="center">
            <%
				if rsn("admin_pic")="<img src=http://>" then 
				 response.Write("no pics")
				 else
				 response.Write(rsn("admin_pic"))
				 end if
				 %>
          </div></td>
          <td></td>
        </tr>
        <tr>
        <td width="90%"><div align="left" class="STYLE8">
          <div align="left">分类管理员:</div>
        </div></td>
      </tr>
      <tr>
        <td><%
				 response.Write(rsn("admin_name"))
				 %></td>
      </tr>
      <tr>
        <td class="STYLE8">管理员信息:</td>
      </tr>
      <tr>
        <td><div align="left">
          <%response.Write(rsn("admin_infor"))
				end if
				
				%>
        </div></td>
      </tr>
    </table>
    </td>
  </tr>
  <tr>
    <td class="STYLE1">&nbsp;</td>
  </tr>
  <tr>
    <td class="STYLE1">&nbsp;</td>
  </tr>
  <tr>
    <td background="images/bg.png" class="STYLE1">评论:<br />
        <span class="STYLE3">
        <%
		  bhx=request("bh")
		  set rs1=server.CreateObject("adodb.recordset") 
		  sel="select * from gbook where id ="&bhx
		  rs1.open "select * from gbook where id="&bhx,conn,1,1
		  response.Write(sql)
		  if rs1.eof and rs1.bof then 
		  response.write("暂时还没有评论!") 
		  else		do while not rs1.eof
		    response.Write("["&rs1("name")&"] 评论说:"&rs1("title")&"<br>")%>
        <%response.write("<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"&rs1("content")&"<br><br>")
			rs1.movenext
			loop
			end if
			rs1.close
			set rs1=nothing
		%>
      </span></td>
  </tr>
</table>
<form name="form1" method="post" action="../gbook.asp">
  <table width="100%" border="0" class="tb1">
    <tr>
      <td class="STYLE3"><div align="center">
        <script type="text/javascript"><!--
google_ad_client = "pub-5540323533903229";
google_ad_width = 468;
google_ad_height = 60;
google_ad_format = "468x60_as_rimg";
google_cpa_choice = "CAAQjZKgnAIaCBwqmEMx7tceKJnA93M";
google_ad_channel = "";
//-->
      </script>
        <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
      </script>
      &nbsp;</div></td>
    </tr>
    <tr>
      <td class="STYLE3"><%
			if session("name")="" then
			 %>
        name:
        <input name="name" type="text" class="STYLE3" id="name" value="shangdu" />
        <%
			   else
			   %>
        name:
        <input name="name" type="text" class="STYLE3" id="name" readonly="readonly" value="<%=session("name")%>" />
        <%end if%>
        <label>
          <input name="newsid" type="text" class="STYLE1" id="newsid" readonly="readonly" value="<%response.write(""&bhx)%>" size="2" />
        </label></td>
    </tr>
    <tr>
      <td class="STYLE3">title:
        <label>
          <input name="title" type="text" class="STYLE3" id="title" />
          e-mail:
          <input name="e-mail" type="text" class="STYLE3" id="e-mail" />
        </label></td>
    </tr>
    <tr>
      <td class="STYLE3"><p>content:</p>
        <p>■ 尊重网上道德,遵守中华人民共和国的各项有关法律法规 <br>
          ■ 承担一切因您的行为而直接或间接导致的民事或刑事法律责任 <br>
          ■ 本站管理人员有权保留或删除其管辖留言中的任意内容 <br>
          ■ 本站有权在网站内转载或引用您的评论 <br>
          ■ 参与本评论即表明您已经阅读并接受上述条款 </p>
        <p>
            <textarea name="content" cols="80" rows="5" class="STYLE3" id="content"></textarea>
          </p>
        <p align="center">
            <input name="Submit" type="submit" class="tb1" value="ok!" />
            <input name="Submit2" type="reset" class="tb1" value="rewrite!" />
          </p>
        <p align="center">&nbsp;		</p></td>
    </tr>
  </table>
</form>
</body>
</html>

⌨️ 快捷键说明

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