国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 網站 > 建站經驗 > 正文

按ID號發布文章(精)

2019-11-02 17:00:27
字體:
來源:轉載
供稿:網友

今天終于把按文章ID生成靜態文章搞定了,相信許多朋友應該需要,為發布文章節約不少時間.

圖片點擊可在新窗口打開查看此主題相關圖片如下:

圖片點擊可在新窗口打開查看

第一步:在Admin/Include/refreshhtml.asp文件的第90行下面插入下面代碼

Response.Write "  <form action=""RefreshHtmlSave.asp?Types=Content&RefreshFlag=AID&ChannelID=" & ChannelID & """ method=""post"" name=""IDForm"">"

  Response.Write "    <tr class='tdbg'>"

  Response.Write "      <td height=""35"" align=""center"">按ID發布</td>"

  Response.Write "      <td height=""35""> 從"

  Response.Write "        <input name=""StartID"" type=""text"" id=""StartID"">"

  Response.Write "        到"

  Response.Write "        <input name=""EndID"" type=""text"" id=""EndID"">"

  Response.Write "        <input name=""SubmitID"" type=""submit"" id=""SubmitID"" value="" 發 布 >>"" border=""0"">"

  Response.Write "      </td>"

  Response.Write "    </tr>"

  Response.Write "  </form>"

第二步:在Admin/Include/refreshhtmlsave.asp文件的第258行定義StartID/和EndID變量

第三步:在Admin/Include/refreshhtmlsave.asp文件的第286行下面插入下面代碼:

   Case "AID" '按ID生成

     StartID = Request("StartID")

     EndID = Request("EndID")

    If startID<>"" and EndID ="" then

     RefreshSql = "Select top 1 * from KS_Article where Verific=1 and  DelTF=0 And ID = " & StartID & " Order By ID Desc"

     RefreshTotalNum =1

    Elseif startID<>"" and EndID <> "" then

     RefreshSql = "Select top 1 * from KS_Article where Verific=1 and  DelTF=0 And ID>= " & StartID & " And  ID <=" & EndID & " Order By ID Desc"

     Set TotalRS = Server.CreateObject("Adodb.RecordSet")

     TotalRS.Open "Select count(*) from KS_Article where Verific=1 and  DelTF=0 And ID >=" & StartID & " And  ID <=" & EndID, Conn, 1, 1

     RefreshTotalNum = TotalRS(0)

     TotalRS.Close

      Set TotalRS = Nothing

    End If
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 施秉县| 射洪县| 东乡族自治县| 岢岚县| 正定县| 永平县| 镇坪县| 华坪县| 通化县| 获嘉县| 云龙县| 元阳县| 长寿区| 五指山市| 右玉县| 唐海县| 香港 | 珠海市| 简阳市| 资兴市| 莱州市| 平邑县| 罗源县| 莆田市| 保山市| 富锦市| 自贡市| 永兴县| 剑阁县| 周口市| 冕宁县| 孝昌县| 黑水县| 浮梁县| 利辛县| 砚山县| 宁德市| 合阳县| 平泉县| 屏东县| 松桃|