📄 index.asp
字号:
<!--#include file="../../include/db.asp"-->
<!--#include file="../../include/admin_check.asp"-->
<!--#INCLUDE FILE="../DATAFORM.ASP"-->
<!--#INCLUDE FILE="power.ASP"-->
<%
Set conn = OpenOrGet_Database("sql_conn")
if trim(request("myjoke"))="1" then
session("bbs_admin")=""
end if
if selectsql="" then
selectsql="select id,name,status from bbs_type order by id desc"
end if
set Rs=OpenOrGet_RsAndPageSize(conn,selectsql,"bbs_Admin",10)
if isnull(session("bbs_Admin")) then
myEmpty=true
end if
id=trim(request("select_del"))
if trim(request("myjoke"))<>"1" and id<>"" then
Actiondel "bbs_type","id","bbs","bbs_id" '删除操作
rs.requery
end if
if isobject(rs) then
Page = CLng(Request("Page"))
If Page < 1 Then Page = 1
If Page > Rs.PageCount Then Page = Rs.PageCount
end if
'response.write rs.recordcount
'response.end
'论坛停止使用或是开始使用
act=trim(request("act"))
if act="toStop" then
selectsql="select * from bbs_type where id='"&trim(request("id"))&"'"
set useRs=open_rs(conn,selectsql)
if not (useRs.eof and useRs.bof) then
useRs("status")=0
useRs.update
end if
rs.requery
end if
if act="toUse" then
selectsql="select * from bbs_type where id='"&trim(request("id"))&"'"
set useRs=open_rs(conn,selectsql)
if not (useRs.eof and useRs.bof) then
useRs("status")=1
useRs.update
end if
rs.requery
end if
%>
<html>
<head>
<title>深圳育才一小欢迎您！</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="/include/page.css" type="text/css">
</head>
<body >
<table width="1" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<table width="753" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><!--#include file="../../include/admin_banner.inc"--></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="1%"> </td>
<td width="99%">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td id="td1"> </td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="21%" valign="top"><!--#include file="../../include/admin_left.inc"--></td>
<td width="2%" valign="top"> </td>
<td width="77%" height=1 valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td background="/images/middle/m-bg.gif" width="70"><img src="/images/wzgl.gif"></td>
<td background="/images/middle/m-bg.gif" align="right"><img src="/images/middle/pacer1.gif" width="3" height="38"></td>
<td background="/images/middle/m-bg.gif" align="right" valign="middle" width="16"><a href=# onClick="more()"><img src="/images/middle/more.gif" width="16" height="16" border=0 alt="更多"></a></td>
<td background="/images/middle/m-bg.gif" align="right" width="8"><img src="/images/middle/pacer.gif" width="8" height="38"></td>
<td background="/images/middle/m-bg.gif" align="right" valign="middle" width="16"><a href=# onClick="help()"><img src="/images/middle/help.gif" width="16" height="16" border=0 alt="栏目帮助"></a></td>
<td width="6" align="right"><img src="/images/middle/M-r.gif" width="16" height="38"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="bg-left" width="6"><img src="/images/left/l-l.gif" border=0></td>
<td class="newsborder" width="100%" >
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td height="200" valign="top">
<p align="center">
<table align=center border=0 cellpadding=0 cellspacing=2 width="95%">
<tbody>
<tr valign=center>
<td align=middle>
<%
Dim arrField(2)
Dim arrAdd(1)
arrField(0)="编 号,hidden"
arrField(1)="论坛名,"
arrField(2)="使用,hidden"
arrAdd(0)="修改,bbs_edit.asp?,<img src='/images/edit.gif' border=0 alt='修改'>"
arrAdd(1)="使用,select_use"
dispgrid rs,arrField,arrAdd
%>
<br>
<table border=0 cellpadding=0 cellspacing=0>
<tr><td><%
NavigatorGrid
%>
</td>
<td> </td>
<td><img border=0 src="/images/button_left.gif" ></td>
<td background=/images/button_bg.gif class=button noWrap> <a href="bbs_edit.asp"><span style="cursor:hand">新
增</span></a> </td>
<td><img border=0 src="/images/button_right.gif"></td>
<td> </td>
<td><img border=0 src="/images/button_left.gif" ></td>
<td background=/images/button_bg.gif class=button noWrap> <a href="../admin_index.asp"><span style="cursor:hand">返
回</span></a> </td>
<td><img border=0 src="/images/button_right.gif"></td>
</tr>
</table>
<p></p>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<td class="bg_right" width="6"><img src="/images/left/l-r.gif" border=0></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="top" class="xxtz_bg">
<td width="6"><img src="/images/middle/m_left.gif" width="13" height="8"></td>
<td width="100%" align="right"></td>
<td align="right" width="6"><img src="/images/middle/m_right.gif" width="12" height="8"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="13"> </td>
</tr>
<tr>
<td><!--#include file="../../include/dot.inc"--></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
<SCRIPT language=javascript>
<!--
function checkform()
{
var Checkblank = /^(\s*|(\ )|(\.))*$/;
if (Checkblank.test(form.username.value))
{
alert("用户名不能为空!");
return false;
}
if (Checkblank.test(form.userpass.value))
{
alert("密码不能为空!");
return false;
}
window.form.submit();
}
function submitdel()
{
var flag=false;
if (isNaN(dataform.select_del.length)&&(!(dataform.select_del.checked))){
flag=false;}
else if(!(isNaN(dataform.select_del.length))){
for (var i=0;i<dataform.select_del.length;i++){
if (dataform.select_del[i].checked==true) flag=true;
}}
else{
flag=true;
}
if ((flag==false)) {alert ('请选择需要删除的项目！');return false;}
if (!(confirm("您是否确定删除选定的记录？")))
{
if (isNaN(dataform.select_del.length)) {dataform.select_del.checked=false;return false;}
for (var i=0;i<dataform.select_del.length;i++) dataform.select_del[i].checked=false;
return false
}
window.dataform.submit();
}
function openwin(filename)
{
//alert(filename);
window.open(filename,"","location=0,menubar=1,left=0,width=700,height=500,");
return;
}
//-->
</SCRIPT>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -