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

📄 look_book.asp

📁 小说站源代码文件
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<script language="JavaScript">
<!--
function jopens(id)
{
	var filename=""+id;
	window.open(filename,"显示窗口","toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=no,resizable=no,width=550,height=350");
}
//-->
</script><table border="0" cellpadding="0" cellspacing="0" valign="top" width="100%">
	<tr>
		<td align="left" valign="top">
		<table border="0" cellpadding="0" cellspacing="0" width="100%" valign="top" align="center">
			<tr>
				<td width="100%" align="left" class="xt">
				<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
					<tr>
						<td height="30" align="center" class="font"><br>
						<font face="隶书" size="5" color="#800000"><%=rs_s("list_name")%></font>
						<hr size="3"></td>
					</tr>
					<tr>
						<td align="center">
						<table cellspacing="0" cellpadding="0" width="98%" border="0" align="center">
							<tr>
								<td>类别:<%=rs2("list_classname")%></td>
								<td>作者:<%=rs_s("list_user")%></td>
								<td>更新:<%=formatdatetime(rs_s("list_gxdate"),2)%></td>
							</tr>
							<tr>
								<td>大类:<%=rs8("list_tpye")%></td>
								<td>性质:<%if rs_s("IsVip")=1 then response.write("VIP作品") end if%>
								<%if rs_s("IsVip")=0 then response.write("公众作品") end if%></td>
								<td>授权:<%=rs_s("list_qianyue")%></td>
							</tr>
							<tr>
								<td>首发:<%if rs_s("list_sftai")=0 then response.write("他站首发") end if%>
								<%if rs_s("list_sftai")=1 then response.write("本站首发") end if%></td>
								<td>字数:<%=rs_s("list_size")%></td>
								<td>进程:<%if rs_s("list_tai")="1" then response.write("转载中...") end if%>
								<%if rs_s("list_tai")="2" then response.write("连载中...") end if%>
								<%if rs_s("list_tai")="3" then response.write("出版中...") end if%>
								<%if rs_s("list_tai")="4" then response.write("已暂停...") end if%>
								<%if rs_s("list_tai")="5" then response.write("已停止...") end if%>
								<%if rs_s("list_tai")="6" then response.write("已完成...") end if%></td>
							</tr>
							<tr>
								<td>点击:<%=rs_s("list_hit")%></td>
								<td>推荐:<%=rs_s("list_jian")%></td>
								<td>收藏:<%=rs_s("list_cang")%></td>
							</tr>
						</table>
						</td>
					</tr>
				</table>
				<hr size="1">
				<table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
					<tr>
						<td width="125" align="center" valign="top">
						<a title=" 阅  读 " href="READ_BOOK.asp?id=<%=rs_s("id")%>">
						<img src="<%=rs_s("list_pic")%>" width="110" height="150" style="border: 1 solid #000000"></a></td>
						<td align="center" valign="top">
						<table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
							<tr>
								<td height="20">&nbsp; <b>[内容简介]</b><br>
								<table width="100%" border="0" cellspacing="0" cellpadding="0">
									<tr>
										<td height="27" style="PADDING-BOTTOM: 5px;PADDING-top: 8px;line-height:150%;">
										  <%=replace(rs_s("list_all"),chr(13),"<Br>")%><br>
										</td>
									</tr>
								</table>
								</td>
							</tr>
						</table>
						</td>
					</tr>
				</table>
				<table width="99%" border="0" cellspacing="0" cellpadding="0" align="center">
					<tr>
						<td height="27">
						<div style="PADDING-BOTTOM: 5px;PADDING-top: 8px;line-height:150%;" align="right">
							主角检索关键字 —— <font color="#FF0000"><%=rs_s("list_key")%></font>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
							<br>
							<a href="http://www.baidu.com/baidu?tn=liuyanhao&word=<%=rs_s("list_name")%>" target="_blank">
							<b><font color="#006600">在百度中搜索更多本书内容</font></b></a>&nbsp;
						</div>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </td>
					</tr>
				</table>
				<table width="99%" border="0" cellspacing="0" cellpadding="0" align="center">
					<tr>
						<td align="center">
						<a href="read_book.asp?id=<%=rs_s("id")%>">
						<img border="0" src="images/r1.gif" width="107" height="31"></a>&nbsp;&nbsp;
						<a title="会员才能使用此功能,快来注册吧!" href="user_save.asp?info=jianbook&id=<%=rs_s("id")%>&us=<%=rs_s("list_userid")%>">
						<img border="0" src="images/r3.gif" width="107" height="31"></a>&nbsp;&nbsp;
						<a title="会员才能使用此功能,快来注册吧!" href="user_save.asp?info=boxaddbook&id=<%=rs_s("id")%>">
						<img border="0" src="images/r2.gif" width="107" height="31"></a>
						<%if rs_s("list_Adminid")<>"0" then%>&nbsp;&nbsp;
						<a href="show_Author.asp?id=<%=rs_s("list_Adminid")%>">
						<img border="0" src="images/r4.gif" width="107" height="31"></a>
						<%else%>&nbsp;&nbsp; <%end if%>
						<a href="javascript:jopens('Down_book.asp?id=<%=rs_s("id")%>')">
						<img border="0" src="images/r5.gif" width="107" height="31"></a>
						</td>
					</tr>
				</table>
				</td>
			</tr>
		</table>
		</td>
	</tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
	<tr>
		<td align="center" valign="top"><hr size="1">
		<table cellspacing="0" cellpadding="0" width="99%" border="0">
			<tr>
				<td height="27">&nbsp; <b>[最新公告]</b></td>
			</tr>
			<tr>
				<td height="27" align="left">&nbsp; <%=rs_s("list_news")%></td>
			</tr>
		</table>
		<hr size="1">
		<table width="99%" border="0" cellspacing="0" cellpadding="0">
			<tr>
				<td height="27">&nbsp; <b>[最新更新]
				<a target="_blank" href="view_book.asp?id=<%=rs_s("newviewid")%>">&nbsp;<font color="#5d5d5d"><%if rs_s("newviewname")<>"" then%><%=rs_s("newviewname")%></font></a>
				</b></td>
			</tr>
			<tr>
				<td height="27" style="PADDING-BOTTOM: 5px;PADDING-top: 8px;line-height:150%;">
				<%=rs_s("newview")%>......</td>
			</tr>
			<%else response.write "暂无更新</td></tr>"%> <%end if%>
		</table>
		<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
			<tr>
				<td align="center" valign="top"><hr size="1"></td>
			</tr>
		</table>
		<table width="99%" border="0" cellspacing="0" cellpadding="0">
			<tr>
				<td height="27">&nbsp; <b>[ 重要提示 ]</b> <br>
				</td>
			</tr>
			<tr>
				<td height="27" style="PADDING-BOTTOM: 5px;PADDING-top: 8px;line-height:150%;">
				<%
id=CheckSql(request("id"))
CheckSqlnum(id)
id=int(id)
set rsvip1=server.CreateObject("ADODB.Recordset")
sqlvip1="select id,view_type,view_date from list_view where view_id="&id&" and view_IsVip=1"
rsvip1.open sqlvip1,conn,1,1
if not(rsvip1.bof and rsvip1.eof) then%>&nbsp;&nbsp;&nbsp;&nbsp; 本书VIP会员最新章节:<a target="_blank" href="vip_view_book.asp?id=<%=rsvip1("id")%>"><%=rsvip1("view_type")%></a> 
				更新日期:<%=rsvip1("view_date")%> <%else%> <%end if
rsvip1.close
set rsvip1=nothing
%>&nbsp;&nbsp;&nbsp;&nbsp; 章节阅读开通用“<font color="#0000FF">左右按键进行前后翻页阅读</font>”的功能,同时<font color="#0000FF">按回车[enter]键直接返回作品首页</font>,<font color="#0000FF">双击鼠标左键自动滚屏 
				,鼠标向上移动滚屏加速,鼠标向下移动滚屏减速,单击左键自动滚屏停止</font>。<br>
&nbsp;&nbsp;&nbsp; 书友所发表的评论,并不代表本站赞同或者支持此观点,我们的立场仅限于传播更多读者感兴趣的信息。如果作品浏览,或对作品内容、版权等方面有质疑,或对本站有意见建议请到站务管理区发帖或查看<a href="readme.asp" target="_blank"><font color="blue">在线帮助</font></a>,感谢您的合作与支持 
				。</td>
			</tr>
		</table>
		</td>
	</tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
	<tr>

⌨️ 快捷键说明

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