日韩av黄I国产麻豆传媒I国产91av视频在线观看I日韩一区二区三区在线看I美女国产在线I麻豆视频国产在线观看I成人黄色短片

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 >

ASP程序实现网页伪静态页源代码

發布時間:2025/3/21 29 豆豆
生活随笔 收集整理的這篇文章主要介紹了 ASP程序实现网页伪静态页源代码 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
很簡單的教程,獻給喜歡SEO的朋友們。把http://www.***.cn/article.asp?logID=26 替換成http://www.***.cn/article.asp?/a26.html。不需要通過iis+ISAPI_Rewrite做基于IIS的url rewrite 一、數據庫很簡單使用ACCESS,Data.mdb建立一個表Article,三個字段:ID,Title,Content;自動編號、標題、文章內容。 二、Config.asp ASP/Visual Basic代碼 <% '數據庫鏈接 db="data.mdb" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db) conn.open connstr If Err Then err.Clear Set conn = Nothing Response.Write "數據庫連接出錯,請檢查連接字串。" Response.End End If '定義新聞閱讀界面的讀取 Dim News_title,News_content Sub ReadNews() set rs1=server.createobject("adodb.recordset") sql1="select id,title,content from article where id="& ID rs1.open sql1,conn,3,3 News_title=rs1("title") News_content=rs1("content") rs1.close set rs1=Nothing End Sub %> 三、Default.asp 以下為引用的內容: ASP/Visual Basic代碼
  • <% Set rs=server.CreateObject("adodb.recordset") sql="select * from Article" rs.open sql,conn,1,1 do while not rs.eof %>
  • .html"><%=left(trim(rs("title")),30)%>
  • <% rs.movenext loop rs.close set rs=Nothing %>
  • 四、Article.asp ASP/Visual Basic代碼 <% id=request.QueryString("id") If id="" Then server_v40=Request.ServerVariables("QUERY_STRING") id=Int(replace(replace(server_v40,"/",""),".html","")) End If Call ReadNews() %> 標題: <%= News_title%>
    內容: <%=News_content%> 這個教程已經能實現最基本的功能,具體大家就想怎么應用就八仙過海,各顯神通了! 《新程序員》:云原生和全面數字化實踐50位技術專家共同創作,文字、視頻、音頻交互閱讀

    總結

    以上是生活随笔為你收集整理的ASP程序实现网页伪静态页源代码的全部內容,希望文章能夠幫你解決所遇到的問題。

    如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。