📄 admin_bookjian.asp
字号:
<!-- #include file="../conn.asp" -->
<!--#include file="../inc/config.asp"-->
<!-- #include file="session.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css.css" rel="stylesheet" type="text/css">
<script language="javaScript" src="../js/js.js"></script>
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
</head>
<body>
<div id="topmomo">
<a href="admin_book.asp?info=list&cndb=vip">查看VIP</a> |
<a href="admin_book.asp?info=add">添加作品</a> |
<a href="admin_book.asp?info=list&cndb=all">查看所有</a> |
<a href="admin_book.asp?info=list&cndb=lock">查看未审核</a></div>
<table border="0" width="100%" align="center" cellpadding="0" cellspacing="0" align="right">
<tr>
<td width="50%"> <a href="admin_bookjian.asp?info=jingpin">精品推荐作品</a>
<a href="admin_bookjian.asp?info=fengmian">封面推荐作品</a>
<a href="admin_bookjian.asp?info=qiangli">强力推荐作品</a>
<a href="admin_bookjian.asp?info=lianzai">连载推荐作品</a> </td>
<form action="admin_booksearch.asp" method="get">
<td height="25" align="right" class="font"> 类型：
<select size="1" name="key_type" class="checklist" style="font-family:幼圆,宋体; font-size: 12px; background-color:white; border-width:1; border-color:black; border-style:solid;">
<option value="list_name">作品名称</option>
<option value="list_user">作者名称</option>
<option value="key">作品主角</option>
</select> 关键字：
<input maxlength="30" name="key_keyword" size="10" class="checklist" style="background-color: #FFFFFF; border: 1 solid #000000">
<input type="submit" value="搜 索" name="submit" class="button">
</td>
</form>
</tr>
</table>
<script language="JavaScript">
<!--
function del(sortname) {
return(confirm('JsIceWeb（今世）提醒：\n\n真的要删除 [ ' + sortname + ' ] 及其下面的所有章节吗？\n\n注意，仅此一次确认！\n'));
}
//-->
</script>
<%
info=request.querystring("info")
Const MaxPerPage=20
If Request("page")<>"" then
CurrentPage=Cint(Request("Page"))
Else
CurrentPage=1
End if
set rs=server.createobject("adodb.recordset")
if info="jingpin" then
sql="select id,list_name,Lock_book,IsVip,IsgoVip,IsGood,Isweb_good,listvv_good,Islist_good,ItemID from list_book where IsGood=1 order by id desc"
elseif info="fengmian" then
sql="select id,list_name,Lock_book,IsVip,IsgoVip,IsGood,Isweb_good,listvv_good,Islist_good,ItemID from list_book where Isweb_good=1 order by id desc"
elseif info="qiangli" then
sql="select id,list_name,Lock_book,IsVip,IsgoVip,IsGood,Isweb_good,listvv_good,Islist_good,ItemID from list_book where listvv_good=1 order by id desc"
elseif info="lianzai" then
sql="select id,list_name,Lock_book,IsVip,IsgoVip,IsGood,Isweb_good,listvv_good,Islist_good,ItemID from list_book where Islist_good=1 order by id desc"
end if
rs.open sql,conn,1,1%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tborder">
<tr>
<td class="thead" align="center" height="25" colspan="10"><b><%
if info="jingpin" then
Response.Write "查看精品推荐作品"
elseif info="fengmian" then
Response.Write "查看封面推荐作品"
elseif info="qiangli" then
Response.Write "查看强力推荐作品"
elseif info="lianzai" then
Response.Write "查看连载推荐作品"
end if
%></b></td>
</tr>
<form name="form" method="get" action="admin_booklist.asp">
<tr align="center" height="25">
<td width="5%" class="tcat">ID</td>
<td width="5%" class="tcat">选择</td>
<td width="20%" class="tcat"><b>作品名称</b></td>
<td width="10%" class="tcat"><b>审核状态</b></td>
<td width="16%" class="tcat"><b>VIP状态</b></td>
<td width="8%" class="tcat"><b>精品推荐</b></td>
<td width="8%" class="tcat"><b>封面推荐</b></td>
<td width="8%" class="tcat"><b>强力推荐</b></td>
<td width="8%" class="tcat"><b>连载推荐</b></td>
<td width="12%" class="tcat"><b>操作</b></td>
</tr>
<%if rs.eof and rs.bof then
response.write "<tr align=center><td height=22 colspan=10 class=alt1><span class=style1>暂时没有任何作品，请添加！</span></td></tr>"
else
Rs.PageSize=MaxPerPage
Allpage=Rs.PageCount
If Currentpage>Allpage Then Currentpage=1
Num=Rs.RecordCount
Rs.MoveFirst
Rs.AbsolutePage=CurrentPage
i=0
do while not rs.eof
%>
<tr align="center" height="22">
<td class="alt2"><%=rs("id")%></td>
<td class="alt1">
<input type="checkbox" name="checked" value="<%=rs("id")%>" class="form"></td>
<td class="alt2">
<a title="点击查看分卷" href="admin_book.asp?info=zhanglist&b_id=<%=rs("id")%>">
<%= rs("list_name") %></a></td>
<td class="alt1">
<input class="button" type="button" name="lock" value="<%if rs("Lock_book")=0 then%>取消审核<%else%>通过审核<%end if%>" onclick="javascript:window.open('admin_bookSave.asp?id=<%=rs("id")%>&act=lock','_blank','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=500,height=300')" style="width: 60; height: 20"></td>
<td class="alt2"><%if rs("IsVip")=1 then%>已通过<%elseif rs("IsgoVip")=1 then%><input class="button" type="button" name="IsgoVip" value="申请理由" onclick="javascript:window.open('admin_bookIsgoVip.asp?id=<%=rs("id")%>','_blank','')" style="width: 60; height: 20"></a><input class="button" type="button" name="IsgoVip" value="通过申请" onclick="javascript:window.open('admin_bookSave.asp?id=<%=rs("id")%>&act=goVip','_blank','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=500,height=300')" style="width: 60; height: 20"><%else%>未通过<input class="button" type="button" name="IsgoVip" value="直接通过" onclick="javascript:window.open('admin_bookSave.asp?id=<%=rs("id")%>&act=goVip','_blank','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=500,height=300')" style="width: 60; height: 20"><%end if%></td>
<td class="alt1">
<input class="button" type="button" name="IsGood" value="<%if rs("IsGood")=1 then%>取消<%else%>推荐<%end if%>" onclick="javascript:window.open('admin_bookSave.asp?id=<%=rs("id")%>&act=IsGood','_blank','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=500,height=300')" style="width: 45; height: 20"></td>
<td class="alt2">
<input class="button" type="button" name="Isweb_good" value="<%if rs("Isweb_good")=1 then%>取消<%else%>推荐<%end if%>" onclick="javascript:window.open('admin_bookSave.asp?id=<%=rs("id")%>&act=Isweb_good','_blank','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=500,height=300')" style="width: 45; height: 20"></td>
<td class="alt1">
<input class="button" type="button" name="listvv_good" value="<%if rs("listvv_good")=1 then%>取消<%else%>推荐<%end if%>" onclick="javascript:window.open('admin_bookSave.asp?id=<%=rs("id")%>&act=listvv_good','_blank','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=500,height=300')" style="width: 45; height: 20"></td>
<td class="alt2">
<input class="button" type="button" name="Islist_good" value="<%if rs("Islist_good")=1 then%>取消<%else%>推荐<%end if%>" onclick="javascript:window.open('admin_bookSave.asp?id=<%=rs("id")%>&act=Islist_good','_blank','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=500,height=300')" style="width: 45; height: 20"></td>
<td class="alt1">
<a href="admin_booklist.asp?info=采集&checked=<%=rs("id")%>">
采集</a>
<a title="修改" href="admin_book.asp?urltype=listjian&info=edit&cndb=<%=info%>&id=<%=rs("id")%>">修改</a>
<a href="admin_works.asp?urltype=listjian&info=book_del&cndb=<%=info%>&id=<%=rs("id")%>&page=<%=CurrentPage%>">
删除</a></td>
</tr>
<% i=i+1
If i>=MaxPerPage Then Exit Do
Rs.MoveNext
Loop
%><tr>
<td height="20" align="center" colspan="10" class="alt3">
<input type="hidden" name="cndb" value="<%=info%>">
<input type="hidden" name="urltype" value="listjian">
<input class="button" type="button" onclick="CheckAll(this.form)" value="全选" name="chkall" style="width: 45; height: 20">
<input class="button" type="button" onclick="CheckOthers(this.form)" value="反选" name="chkOthers" style="width: 45; height: 20">
<input class="button" type="submit" value="删除" name="info" style="width: 45; height: 20">
<input class="button" type="submit" value="推荐" name="info" style="width: 45; height: 20">
<input class="button" type="submit" value="移动" name="info" style="width: 45; height: 20">
<input class="button" type="submit" value="采集" name="info" style="width: 45; height: 20">
<input class="button" type="submit" value="审核" name="info" style="width: 45; height: 20">
<input class="button" type="submit" value="静态生成" name="info">
<input class="button" type="submit" value="通过 VIP" name="info">
</td>
</tr>
</form>
<%End If
Rs.Close
Set Rs=Nothing%>
<tr align="center">
<td height="30" colspan="10" class="alt2"><%Response.Write ShowPage("admin_bookjian.asp?info="&info&"",CurrentPage,Num,MaxPerPage,True,True," 个项目")%></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -