ASP實用大全-實戰ASP(1)
來源：互聯網
上載者：User
ASP計數器設計詳解
Active Server Pager(動態伺服器首頁，簡稱ASP)，通過讀寫伺服器的檔案，結合script語言（VBscript或Jscript）和html碼可以方便地實現頁面計數器功能。現流行的ASP教材和網路上的ASP教程都談到過ASP計數器的設計問題，但是都過於簡單，比如沒有提到怎樣實現計數器指令碼和首頁面的分離以及圖象計數器的實現等。下面就作者為單位製作NT web網站的經驗，舉執行個體循序漸進談談關於ASP計數器的設計，希望能給ASP的初學者和對ASP WEB編程有興趣的網友一些啟發。
（一）簡單的計數器
ASP內含五個內建的"Active Server Components"(ActiveX伺服器組件)，即Database Access component(資料庫訪問組件)、File Access component(檔案訪問組件)、Ad Rotator component(廣告輪播器組件)、Brower Capabilities component(瀏覽器資訊組件)、Content Linking component(內容連結組件)。我們下面要設計的計數器，就是通過其中的File Access component(檔案訪問組件)來讀寫伺服器檔案來實現。演算法思路是：在伺服器端用一個文本(ASCII)檔案存放計數數值，每當頁面被訪問時就從檔案中讀出數值，顯示給使用者，並且使數值加1，把增加後的數值寫回到檔案。
寫入資料到一個伺服器計數檔案的ASP語句和說明如下：
CounFile=Server.MapPath("用來存放計數器值的檔案名稱")
Server伺服器存取方法MapPath(path)是將存放計數器值的檔案所在的路徑 轉換成實體路徑
SET FileObject=Server.CreateObject("Scripting.FileSystemObject")
使用方法CreateObject定義對象FileSystemObject
SET OutStream=Server.CreateTextFile(FileObject,True,False)
使用對象FileSystemObject提供方法CreateTextFile產生文字檔，其中參 數"True"表示覆蓋原來的檔案，"False"表示檔案為ASCII類型
OutStream.WriteLine "要寫入的資料"
OutStream.WriteLine為往檔案寫入一行資料
從一個伺服器檔案讀取資料的ASP文法如下：
CounFile=Server.MapPath("用來存放計數器值的檔案名稱")
SET FileObject=Server.CreateObject("Scripting.FileSystemObject")
SET InStream=Server.OpenTextFile(FileObject,1,false,false)
使用對象FileSystemObject提供方法OpenTextFile產生文本文?
其中參數"True"表示覆蓋原來的檔案，"False"表示檔案為ASCII類型
