LANGUAGE=VBScript CodePage=65001%> "" then Model_FolderName="/"&rs_1("FolderName") end if end if rs_1.close set rs_1=nothing%>
文章列表

 √ 操作提示

1、文章列表顯示您所添加的所有文章,标示“未審核”的文章将不會在網站中顯示。

2、删除文章将會同步删除數據庫中的記錄和文章的具體地址請慎重。

 | 添加新的文章
暫無文章!" end if rs.close set rs=nothing %>
 
編号
文章标題
文章分類
ip/pv
審核
添加時間
文章操作
">
 " target="_blank">"" then%> [] [] [幻燈] [專題]    " end if rs1.close set rs1=nothing if rs("pid")"" then pid=cint(rs("pid")) set rs1=server.createobject("adodb.recordset") sql="select name from category where id="&pid&"" rs1.open(sql),cn,1,1 if not rs1.eof and not rs1.bof then response.write rs1("name") response.write " > " end if rs1.close set rs1=nothing end if if rs("ppid")"" then ppid=cint(rs("ppid")) set rs1=server.createobject("adodb.recordset") sql="select name from category where id="&ppid&"" rs1.open(sql),cn,1,1 if not rs1.eof and not rs1.bof then response.write rs1("name") end if rs1.close set rs1=nothing end if %>
/
  全選/全不選 
 
 | 文章搜索