?? bbsman.asp
字號:
<!--#include virtual="/manage/include/top.asp"-->
<tr bgcolor="#dddddd">
<td height="1" colspan="4"></td>
</tr>
<tr>
<td height="34" colspan="2" bgcolor="efefef">
<span class="style8"> <img src="../images/borrow.gif"><span class="style2"><strong> 公告管理</strong></span></span></td>
<td height="19" bgcolor="f5f5f5"> </td>
<td height="19" bgcolor="f5f5f5"> </td>
</tr>
<tr>
<td height="184" colspan="4" valign="top">
<script language="javascript">
function newwin(url){
window.open(url,"","width=550,height=400,left=0,top=0");
}
function chkfields(){
if (document.form1.title.value==''){
alert("請填寫標題!");
return false;
}
return true;
}
function selall(){
var nn=self.document.all.item("delit")
if(nn.length>=2){
for(j=0;j<nn.length;j++){
self.document.all.item("delit",j).checked=true;
}
}else{
self.document.all.item("delit",0).checked=true;
}
}
function selnull(){
var nn=self.document.all.item("delit");
for(j=0;j<nn.length;j++){
self.document.all.item("delit",j).checked=false;
}
}
</script>
<%
Set conn=Server.CreateObject("ADODB.Connection")
conn.connectionstring="Driver={Sql Server};Server=(local);UID=sa;database=DB_lsmanage"
conn.open
%>
<br>
<FORM action="/manage/bbs/delbbs.asp" method="post" name="form1">
<table width="90%" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#0099cc">
<tr>
<td width="7%" bgcolor="#f5f5f5"><div align="center" style="font-weight: bold; font-size: 10pt; color: #663366;">ID</div></td>
<td width="70%" bgcolor="#f5f5f5"><div align="center" style="font-weight: bold; font-size: 10pt; color: #663366;">公告標題</div></td>
<td width="14%" bgcolor="#f5f5f5"><div align="center" style="font-weight: bold; font-size: 10pt; color: #663366;">發布時間</div></td>
<td width="9%" bgcolor="#f5f5f5"><div align="center" style="font-weight: bold; font-size: 10pt; color: #663366;">刪除</div></td>
</tr>
<%
'response.write "select yName,sum(Sl) AS Sl,sum(TotalPrice) AS TotalPrice,UserId from Stbl "&sqlstr&" group by UserId,yName order by Sl desc"
sql="select idx,title,regDate from tb_NoticeBBS order by idx desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
if rs.eof then
response.write "<tr><td align=center colspan=4 bgcolor=#ffffff>目前還沒有公告發布</td></tr></table>"
else
rs.pagesize = 2
page=Clng(request.QueryString("page"))
if page = "" or page <= 0 then page=1
if page > rs.pagecount then page = pagecount
rs.Absolutepage = page
for i=1 to rs.pagesize
if rs.eof then exit for
%>
<tr>
<td bgcolor="#ffffff"><div align="center"><%=rs("idx")%></div></td><td bgcolor="#ffffff"><div align="center"><a href="#" onClick="newwin('/manage/bbs/bbsList.asp?idx=<%=rs("idx")%>')"><%=rs("title")%></a></div></td><td bgcolor="#ffffff"><div align="center"><%=rs("regDate")%></div></td><td bgcolor="#ffffff"><div align="center"><input type="checkbox" name="delit" value="<%=rs("idx")%>"></div></td>
</tr>
<%
rs.movenext
next
%>
<tr>
<td colspan="4" align="center" bgcolor="#FFFFFF"><input type="button" value="全選" onClick="selall()" style="border:1px solid;border-color:#4c99d4;background:#f2ebc3"> <input type="button" value="清空" onClick="selnull()"style="border:1px solid;border-color:#4c99d4;background:#f2ebc3"> <input type="submit" value="刪除"style="border:1px solid;border-color:#4c99d4;background:#f2ebc3"></td>
</tr>
</table>
</form>
<table border="0" width="90%" align="center">
<tr>
<td align="right">
<%
response.write "共<font color=red>"&rs.recordcount&"</font>條公告 當前頁:<font color=red>"&page&"</font>/"&rs.pagecount&" "
if page>1 then
response.write "<a href=bbsman.asp?page=1>首頁</a> "
response.write "<a href=bbsman.asp?page="&(page-1)&">上一頁</a> "
else
response.write "首頁 "
end if
if page<rs.pagecount then
response.write "<a href=bbsman.asp?page="&(page+1)&">下一頁</a> "
response.write "<a href=bbsman.asp?page="&rs.pagecount&">最后一頁</a>"
end if
%>
</td>
</tr>
</table>
<%
end if
%>
<br>
<br>
<br>
<center>
<input type="button" value="發布新公告" onClick="newwin('addbbs.asp')" style="border:1px solid;border-color:#4c99d4;background:#f2ebc3">
</center>
<!--#include virtual="/manage/include/bottom.asp"-->
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -