文字反

張貼於2009年3月4日在 ASP的管理

現在創建一個文件夾稱為櫃檯或者你可以稱它為別的如果你想只記得和改變上面的代碼。 現在創建一個文本文件名為counter1.txt ，並輸入你想開始計數。

“ ％ @語言=的VBScript ％ ”
“ ％
暗淡的電影服務統籌科
成立電影服務統籌科= Server.CreateObject （ “ Scripting.FileSystemObject ” ）
/ /這是你的路徑counter1.txt文件
反= Server.MapPath （ “ /計數器” ） ＆ “ \ counter1.txt ”
/ /打開文本文件
集InStream = fso.OpenTextFile （計數器， 1 ，虛假）
oldCount =修剪（ InStream.ReadLine ）
/ /遞增oldcount 1和存儲在newcount
newCount = oldCount + 1
集OutStream = fso.CreateTextFile （櫃檯或True ）
/ /複製newcount的文本文件
OutStream.WriteLine （ newCount ）
％ “

現在，您將使folllowing在您想要的計數器顯示在您的網站

“ ％ = newCount ％ ”

相關帖子：

  1. 更準確的文字櫃檯 這是一個更精確的打擊比我們前面的例子...
  2. 顯示CSV文件 顯示CSV文件中是常見的CSV文件格式， ...
  3. CSV文件保存到一個數據庫 創建一個數據庫中獲取所謂stock.mdb 。 現在創建...
  4. rndimage1 這是一個簡單的隨機圖像腳本理想...
  5. 寫文本文件 此示例使用流寫文本文件...

有關職位為您帶來的另一種相關文章插件 。

發表評論