ASP技巧：用標籤替換的方法產生靜態網頁

最後更新：2017-02-28 來源：互聯網

上載者：User

創建阿里雲帳戶，並獲得超過 40 款產品的免費試用版；而企業帳戶則可以享有總值 $1200 的免費試用版。立即註冊！

大家都知道HTML靜態網頁更容易被搜尋引擎收錄索引，動態產生HTML網頁，也可使網站的網頁數量增多，搜尋引擎收錄的數量也可能多，再加下提高網頁的品質也意未著什麼呢？我想大家也知道。

為了這個，我決定了改變之前網站建設,網頁設計的方法,經過多翻的研究及思考，對多種網頁動態產生的方法，我比較喜歡用標籤替換的方法成生網頁。

標籤替換法：這是我個人理解的定義，不知道別人怎麼叫它的，呵呵！

標籤替換法，就是在設計好了的網頁模板中，放入自已設定的標籤，然後用你需要顯示出來的東東替換它。如

模板檔案1

這個模板我們儲存在資料庫表中 temptable

<html>
<head>
<title>{$SiteName} </title>
</head>
<body>
{$Arc_List$}
</body>
<html>

在以上模板中我放入了兩個標籤{$SiteName}網站名稱和{$Arc_List$}文章列表,再來看下面的代碼

<%
    dim rs,SiteName,Arc_List,fso,myFile,FilePath,html
    SiteName="我的第一個動態產生的HTML網頁"
    FilePath = Server.MapPath("/html/index.html")
   set rs=server.createobject("adodb.recordset")
   rs.open"select [temp] from temptable,conn,1,1
   html = rs("temp")   '讀取網頁模板
   rs.close
   html = replace(html, "{$SiteName}" , SiteName)          '用自訂的 SiteName 替換{$SiteName}標籤
   html = html & replace(html, "{$Arc_List$} " , get_ArcList())   '用自訂的get_ArcList()函數替換{$Arc_List$}標籤
set rs=nothing
conn.close
set conn=nothing
   set fso=CreateObject("***ing.FileSystemObject")     '建立檔案系統對象
   Set MyFile = fso.CreateTextFile(FilePath,True)               '建立檔案
   MyFile.WriteLine(html)                                                         '把htm代碼寫入檔案
   MyFile.close    '關閉檔案
   Set MyFile = nothing    '釋放檔案對象
   set fso = nothing     '釋放系統檔案對象
   response.write "<*** language='java***'>window.alert('檔案產生成功了');</***>"
response.end()
   Function get_ArcList()
         dim str,str1
         str1=""
         str = "<ul>{list}</ul>"
         rs.open"select Title,url from Arc"
         while not rs.eof
                str1 = str1 & "<li><a href="&rs("url")&">"&rs("Title")&"</a></li>"
        rs.movenext
        wend
        rs.close
       str = replace(str, "{list}", Str1)
       get_ArcList = str
%>
End Function

以上的方法是不是很簡單，現在很多CMS都是採用這種方法產生靜態網頁的，這種方法使用比較靈活，只要你用心去設計一下你的系統，以後網做一個網站，只要設計範本就可以了。。。呵呵，禺現在一個網站建設公司上班，有空時會隨意寫一點東東，禺的QQ：645556964，歡迎做朋友共同探討交流

本文章原先以中文撰寫並發佈於 aliyun.com，亦設英文版本，僅作資訊用途。本網站不對文章的準確性，完整性或可靠性或其任何翻譯作出任何明示或暗示的陳述或保證。如對該文章有任何疑慮或投訴，請傳送電郵至 info-contact@alibabacloud.com 並提供相關疑慮或投訴的詳細說明。職員會於 5 個工作天內與您聯絡，一經驗證之後，即會刪除該侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

Get Started for Free

Sales Support

1 on 1 presale consultation

Chat Contact Sales
After-Sales Support

24/7 Technical Support 6 Free Tickets per Quarter Faster Response

Open a Ticket
Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.

Learn More