📄 admin_create.asp

📁 sfsfds设定方式分上述事实是事实是事实是事实是事实上

💻 ASP

字号:

<!--#include file="mdb.asp"-->
<%
if session("adminlogin")<>sessionvar then
Response.Write("<script language=javascript>alert('你尚未登录，或者超时了！请重新登录');this.location.href='admin_login.asp';</script>")
Response.End
End if
%>
<HTML>
<HEAD>
<TITLE>生成页面</TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<LINK REL="stylesheet" HREF="css.css" TYPE="text/css">
</HEAD>
<BODY>
<table width="96%" border="0" cellspacing="1" cellpadding="8" align="center" class="b">
<tr>
<td align="center">生成分类页面</td>
</tr></table>
<table width="96%" border="0" cellspacing="1" cellpadding="8" align="center" class="a">
<form action="admin_create_html.asp" method="post">
<tr>
<td width="20%">选择要生成的类别：</td>
<td width="80%">
<select name="classid" class="c">
<option selected value="">生成所有类别</option>
<%
set rssss(0)=server.createobject("adodb.recordset")
rssss(0).open "select classid,classname,verity from O3888_class where topclass=0",conn,1,3
while not rssss(0).eof
	response.write "<option value='"&rssss(0)("classid")&"'>"&rssss(0)("classname")&"("&rssss(0)("classid")&")</option>"&vbCrLf
	call listunder(1)
	rssss(0).movenext
wend
%>
<option selected value="">生成所有类别</option>"
</select>
</td>
</tr>
<tr>
<td>点击生成：</td>
<td><input type="submit" class="d" value="马上生成HTML文件"></td>
</tr>
</form>
<tr>
<td>说明</td>
<td>1：生成所有类别时速度较慢，请耐心等待<br>2：此功能非常占用系统资源较大，尽量不要在服务器繁忙期间使用</td>
</tr>
<tr>
<td align="center" colspan="2">[<A href='http://www.03888.com/' target=_blank>03888网址大全</A>]</td>      
</tr>
</table>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -