📄 admin_book.asp
字号:
response.write "selected"
end if
response.write " >"&rs1("list_tpye")&"</option>"
rs1.MoveNext
Loop
rs1.close
set rs1=nothing
%></select></div></div> ***</td>
<td width="20%" height="22" align="right" class="alt2">小类名称：<br>
</td>
<td width="30%" class="alt1"><%if typeids<>"" then%><div class="select"><div><select name="list_lei" size="1" class="form">
<%
set rs3=server.createobject("adodb.recordset")
sql="select list_classid,list_classname from list_class where list_typeid="&typeids
rs3.open sql,conn,1,1
Do while not rs3.eof
%>
<option value="<%=CStr(rs3("list_classid"))%>" name="list_lei" <%if rs3("list_classid")=list_classid then response.write(" selected") end if%>>
<%=rs3("list_classname")%></option>
<%rs3.MoveNext
Loop
rs3.close
else%></select></div></div><%end if%> *** </td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">作品名称：<br>
</td>
<td width="30%" class="alt1">
<input name="list_name" type="text" class="form" id="list_name" value="<%=rs("list_name")%>" size="20">
***</td>
<td width="20%" height="22" align="right" class="alt2">检索字母：<br>
</td>
<td width="30%" class="alt1">
<div class="select"><div><select name="list_abc" class="form">
<option value="9">自动判断</option>
<option value="a" <%if rs("list_abc")="a" then response.write(" selected") end if%>>
A/a</option>
<option value="b" <%if rs("list_abc")="b" then response.write(" selected") end if%>>
B/b</option>
<option value="c" <%if rs("list_abc")="c" then response.write(" selected") end if%>>
C/c</option>
<option value="d" <%if rs("list_abc")="d" then response.write(" selected") end if%>>
D/d</option>
<option value="e" <%if rs("list_abc")="e" then response.write(" selected") end if%>>
E/e</option>
<option value="f" <%if rs("list_abc")="f" then response.write(" selected") end if%>>
F/f</option>
<option value="g" <%if rs("list_abc")="g" then response.write(" selected") end if%>>
G/g</option>
<option value="h" <%if rs("list_abc")="h" then response.write(" selected") end if%>>
H/h</option>
<option value="i" <%if rs("list_abc")="i" then response.write(" selected") end if%>>
I/u</option>
<option value="j" <%if rs("list_abc")="j" then response.write(" selected") end if%>>
J/j</option>
<option value="k" <%if rs("list_abc")="k" then response.write(" selected") end if%>>
K/k</option>
<option value="l" <%if rs("list_abc")="l" then response.write(" selected") end if%>>
L/l</option>
<option value="m" <%if rs("list_abc")="m" then response.write(" selected") end if%>>
M/m</option>
<option value="n" <%if rs("list_abc")="n" then response.write(" selected") end if%>>
N/n</option>
<option value="o" <%if rs("list_abc")="o" then response.write(" selected") end if%>>
O/o</option>
<option value="p" <%if rs("list_abc")="p" then response.write(" selected") end if%>>
P/p</option>
<option value="q" <%if rs("list_abc")="q" then response.write(" selected") end if%>>
Q/q</option>
<option value="r" <%if rs("list_abc")="r" then response.write(" selected") end if%>>
R/r</option>
<option value="s" <%if rs("list_abc")="s" then response.write(" selected") end if%>>
S/s</option>
<option value="t" <%if rs("list_abc")="t" then response.write(" selected") end if%>>
T/t</option>
<option value="u" <%if rs("list_abc")="u" then response.write(" selected") end if%>>
U/u</option>
<option value="v" <%if rs("list_abc")="v" then response.write(" selected") end if%>>
V/v</option>
<option value="w" <%if rs("list_abc")="w" then response.write(" selected") end if%>>
W/w</option>
<option value="x" <%if rs("list_abc")="x" then response.write(" selected") end if%>>
X/x</option>
<option value="y" <%if rs("list_abc")="y" then response.write(" selected") end if%>>
Y/y</option>
<option value="z" <%if rs("list_abc")="z" then response.write(" selected") end if%>>
Z/z</option>
<option value="0" <%if rs("list_abc")="0" then response.write(" selected") end if%>>
其他</option>
</select></div></div> ***</td>
</tr>
<tr>
<td width="20%" height="45" align="right" class="alt2" style="line-height:150%;">
作品作者：<br>
</td>
<td width="30%" class="alt1">
<input name="list_user" value="<%=rs("list_user")%>" type="text" id="list_user" size="20" class="form">
***<br>
<br>
输入原作者</td>
<td width="20%" height="39" align="right" class="alt2">归作品更新员：<br>
<br>
归驻站作家：<br>
</td>
<td width="30%" class="alt1">
<div class="select"><div><select name="list_userid" class="form" size="1">
<option value="0">不设置...</option>
<%set rsu=server.createobject("adodb.recordset")
sqlu="select id,NAME from Userinfo where GOGXuser=1 order by id"
rsu.open sqlu,conn,1,1
Do while not rsu.eof%>
<option value="<%=rsu("id")%>" <%if rs("list_userid")=rsu("id") then response.write(" selected") end if%>>
<%=rsu("NAME")%></option>
<%rsu.MoveNext
Loop
rsu.close
set rsu=nothing%></select></div></div>进行更新<br>
<br>
<div class="select"><div><select name="list_Adminid" class="form" size="1">
<option value="0">不设置...</option>
<%set rsa=server.createobject("adodb.recordset")
sqla="select Author_ID,author_Name from Author where author_addpost=1 order by Author_ID"
rsa.open sqla,conn,1,1
Do while not rsa.eof%>
<option value="<%=rsa("Author_ID")%>" <%if rs("list_adminid")=rsa("author_id") then response.write(" selected") end if%>>
<%=rsa("author_Name")%></option>
<%rsa.MoveNext
Loop
rsa.close
set rsa=nothing%></select></div></div>进行管理<br>
</td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">是否本站首发：<br>
</td>
<td width="30%" class="alt1">
<input type="radio" name="list_sftai" value="1" <%if rs("list_sftai")=1 then response.write "checked" end if%>>是
<input name="list_sftai" type="radio" value="0" checked <%if rs("list_sftai")=0 then response.write "checked" end if%>>否</td>
<td width="20%" height="22" align="right" class="alt2">签约授权状态：<br>
</td>
<td width="30%" class="alt1">
<div class="select"><div><select name="list_qianyue" class="form">
<option value="尚未获取授权" <%if rs("list_qianyue")="尚未获取授权" then response.write(" selected") end if%>>
尚未获取授权</option>
<option value="正在获取授权" <%if rs("list_qianyue")="正在获取授权" then response.write(" selected") end if%>>
正在获取授权</option>
<option value="已经获取授权" <%if rs("list_qianyue")="已经获取授权" then response.write(" selected") end if%>>
已经获取授权</option>
<option value="独家授权转载" <%if rs("list_qianyue")="独家授权转载" then response.write(" selected") end if%>>
独家授权转载</option>
<option value="本站独家连载" <%if rs("list_qianyue")="本站独家连载" then response.write(" selected") end if%>>
本站独家连载</option>
<option value="本站特级签约" <%if rs("list_qianyue")="本站特级签约" then response.write(" selected") end if%>>
本站特级签约</option>
<option value="本站一级签约" <%if rs("list_qianyue")="本站一级签约" then response.write(" selected") end if%>>
本站一级签约</option>
<option value="本站二级签约" <%if rs("list_qianyue")="本站二级签约" then response.write(" selected") end if%>>
本站二级签约</option>
<option value="本站三级签约" <%if rs("list_qianyue")="本站三级签约" then response.write(" selected") end if%>>
本站三级签约</option>
</select></div></div></td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">作品封面：<br>
</td>
<td width="80%" class="alt1" colspan="3">
<input name="pic" type="text" class="form" id="pic" value="<%=rs("list_pic")%>" size="50"><input name="attach" type="hidden">
<input name="list_loadpic" type="checkbox" value="True">远程获取封面<br>
<iframe border="0" frameborder="0" noresize scrolling="no" src="Admin_upload.asp?info=BookFace" name="a" height="25" width="450">
</iframe></td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">作品状态：<br>
</td>
<td width="80%" class="alt1" colspan="3">
<div class="select"><div><select name="list_tai" class="form">
<option value="1" <%if rs("list_tai")="1" then response.write(" selected") end if%>>
转载中...</option>
<option value="2" <%if rs("list_tai")="2" then response.write(" selected") end if%>>
连载中...</option>
<option value="3" <%if rs("list_tai")="3" then response.write(" selected") end if%>>
出版中...</option>
<option value="4" <%if rs("list_tai")="4" then response.write(" selected") end if%>>
已暂停...</option>
<option value="5" <%if rs("list_tai")="5" then response.write(" selected") end if%>>
已停止...</option>
<option value="6" <%if rs("list_tai")="6" then response.write(" selected") end if%>>
已完成...</option>
</select></div></div></td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">作品来源：<br>
</td>
<td width="80%" class="alt1" colspan="3">
<input name="laiyuan" type="text" class="form" id="laiyuan" value="<%=rs("laiyuan")%>" size="30"></td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">搜索关键字：<br>
</td>
<td width="80%" class="alt1" colspan="3">
<input name="key" type="text" class="form" id="key" value="<%=rs("list_key")%>" size="30">
***</td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">内容介绍：<br>
(不能超过1500字)<br>
</td>
<td width="80%" class="alt1" colspan="3">
<textarea name="list_all" cols="55" rows="8" class="form" id="list_all"><%=rs("list_all")%></textarea>
***</td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">作品公告：<br>
(不能超过1500字)<br>
</td>
<td width="80%" class="alt1" colspan="3">
<textarea name="list_news" cols="55" rows="8" class="form" id="list_news"><%=rs("list_news")%></textarea></td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">是否为<font color="#FF0000">VIP作品</font>：<br>
</td>
<td width="30%" class="alt1">
<input type="radio" name="IsVip" value="1" <%if rs("isvip")=1 then response.write "checked" end if%>>是
<input name="IsVip" type="radio" value="0" <%if rs("isvip")=0 then response.write "checked" end if%>>否</td>
<td width="20%" height="22" align="right" class="alt2">是否精品推荐作品：<br>
</td>
<td width="30%" class="alt1">
<input type="radio" name="IsGood" value="1" <%if rs("isgood")=1 then response.write "checked" end if%>>是
<input name="IsGood" type="radio" value="0" <%if rs("isgood")=0 then response.write "checked" end if%>>否</td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">是否<font color="#FF0000">通过审核</font>：<br>
</td>
<td width="30%" class="alt1">
<input name="Lock_book" type="radio" value="0" <%if rs("lock_book")=0 then response.write "checked" end if%>>通过
<input type="radio" name="Lock_book" value="1" <%if rs("lock_book")=1 then response.write "checked" end if%>>不通过</td>
<td width="20%" height="22" align="right" class="alt2">是否封面推荐作品：<br>
</td>
<td width="30%" class="alt1">
<input type="radio" name="Isweb_good" value="1" <%if rs("isweb_good")=1 then response.write "checked" end if%>>是
<input name="Isweb_good" type="radio" value="0" <%if rs("isweb_good")=0 then response.write "checked" end if%>>否</td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">是否锁定书评：<br>
</td>
<td width="30%" class="alt1">
<input type="radio" name="Lock_lun" value="1" <%if rs("lock_lun")=1 then response.write "checked" end if%>>锁定
<input name="Lock_lun" type="radio" value="0" <%if rs("lock_lun")=0 then response.write "checked" end if%>>不锁定</td>
<td width="20%" height="22" align="right" class="alt2">是否强力推荐作品：<br>
</td>
<td width="30%" class="alt1">
<input type="radio" name="listvv_good" value="1" <%if rs("listvv_good")=1 then response.write "checked" end if%>>是
<input name="listvv_good" type="radio" value="0" <%if rs("listvv_good")=0 then response.write "checked" end if%>>否</td>
</tr>
<tr>
<td width="20%" height="22" align="right" class="alt2">是否允许游客阅读：<br>
</td>
<td width="30%" class="alt1">
<input type="radio" name="isuserread" value="0" <%if rs("isuserread")=0 then response.write "checked" end if%>>允许
<input name="isuserread" type="radio" value="1" <%if rs("isuserread")=1 then response.write "checked" end if%>>不允许</td>
<td width="20%" height="22" align="right" class="alt2">是否连载推荐作品：<br>
</td>
<td width="30%" class="alt1">
<input type="radio" name="Islist_good" value="1" <%if rs("islist_good")=1 then response.write "checked" end if%>>是
<input name="Islist_good" type="radio" value="0" <%if rs("islist_good")=0 then response.write "checked" end if%>>否</td>
</tr>
</table>
</div>
<div style="MARGIN-TOP: 6px;MARGIN-bottom: 6px" align="center">
<input type="submit" class="button" value="确认修改">
<input type="reset" class="button" value="重置内容"></div>
</td>
</tr>
</form>
</table>
<%
end if
rs.close
set rs=nothing
end sub
Sub zhanglist()%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -