newlistbook.asp

来自「小说站源代码文件」· ASP 代码 · 共 26 行

<!--#include file="../conn.asp"--><%id=CheckSql(request.querystring("id"))
CheckSqlnum(id)
id=int(id)
set rs_s=server.createobject("adodb.recordset")
sql="select list_size,list_tai,list_gxdate,list_hit,list_jian,list_cang from list_book where id="&id&""
rs_s.open sql,conn,1,1
if not(rs_s.bof and rs_s.eof) then
if rs_s("list_tai")="1" then
booktai="转载中..."
elseif rs_s("list_tai")="2" then
booktai="连载中..."
elseif rs_s("list_tai")="3" then
booktai="出版中..."
elseif rs_s("list_tai")="4" then
booktai="已暂停..."
elseif rs_s("list_tai")="5" then
booktai="已停止..."
elseif rs_s("list_tai")="6" then
booktai="已完成..."
end if
response.write "document.write(""<tr><td>字数："&rs_s("list_size")&"</td><td>进程："&booktai&"</td><td>更新："&rs_s("list_gxdate")&"</td></tr>"");"
response.write "document.write(""<tr><td>点击："&rs_s("list_hit")&"</td><td>推荐："&rs_s("list_jian")&"</td><td>收藏："&rs_s("list_cang")&"</td></tr>"");"
end if
rs_s.close
set rs_s=nothing%>