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

📄 newviewbook.asp

📁 小说站源代码文件
💻 ASP
字号:
<!--#include file="../conn.asp"--><!--#include file="../inc/config.asp"--><%id=CheckSql(request.querystring("id"))
CheckSqlnum(id)
id=int(id)
if htmlphem=1 then
htmlphe="htm"
elseif htmlphem=2 then
htmlphe="html"
elseif htmlphem=3 then
htmlphe="shtml"
elseif htmlphem=4 then
htmlphe="asp"
else
htmlphe="html"
end if
set rs_s=server.createobject("adodb.recordset")
sql="select newviewid,newviewname,newview from list_book where id="&id&""
rs_s.open sql,conn,1,1
if not(rs_s.bof and rs_s.eof) then
response.write "document.write(""<table width=99% border=0 cellspacing=0 cellpadding=0><tr><td height=27>&nbsp; <b>[最新更新]&nbsp;<a href="&id&"/"&rs_s("newviewid")&"."&htmlphe&"><font color=#5d5d5d>"");"
if rs_s("newviewname")<>"" then
response.write "document.write("""&rs_s("newviewname")&"</font></a></td></tr><tr><td height=27 style='PADDING-BOTTOM: 5px;PADDING-top: 8px;line-height:150%;'>"");"
response.write "document.write("""&rs_s("newview")&"......</td></tr>"");"
else
response.write "document.write(""暂无更新</td></tr>"");"
end if
response.write "document.write(""</table>"");"
end if
rs_s.close
set rs_s=nothing%>

⌨️ 快捷键说明

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