程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> 關於ASP編程 >> ASP中FSO的神奇功能 - 寫文件

ASP中FSO的神奇功能 - 寫文件

編輯:關於ASP編程
作 者 : 甘冀平 ;


   假設你想創建一個簡單的留言簿,你可以建立一個數據庫,在其中存儲用戶的信息。然而,如果並不需要數據庫的強大功能,使用FSO來存儲信息將節省你的時間和金錢。並且,一些ISP也許限制了web上的數據庫應用。

   假設你在一個表單中收集了一些用戶信息,這裡是一個簡單表單HTML代碼:

< html>
< body>

< form action="formhandler.asp" method="post">
< input type="text" size="10" name="username">
< input type="text" size="10" name="homepage">
< input type="text" size="10" name="Email">
< /form>
< /body>
< /html>

   再看看formhandler.asp中處理表單的代碼:

< %
' Get form info
strName = Request.Form("username")
strHomePage = Request.Form("homepage")
strEmail = Request.Form("Email")

' create the fso object
Set fso = Server.CreateObject("Scripting.FileSystemObject")

   迄今為止,還沒有新鮮的東西,無非是獲取表單域的值並且賦值到變量。下面出現了有趣的部分 - 寫文件:

path = "c: emp est.txt"
ForReading = 1, ForWriting = 2, ForAppending = 3

' open the file
set file = fso.opentextfile(path, ForAppending, TRUE)

' write the info to the file
file.write(strName) & vbcrlf
file.write(strHomePage) & vbcrlf
file.write(strEmail) & vbcrlf

' close and clean up
file.close
set file = nothing
set fso = nothing


   回想一下,OpenTextFile方法返回一個TextStream對象,它是FSO模型中的另外一個對象。TextStream對象揭示了操作文件內容的方法,比如寫、讀一行、跳過一行。VB常量vbcrlf產生一個換行符。

   在OpentextFile的命令參數中定義了TRUE,這就告訴了系統,如果文件不存在,就創建它。如果文件不存在,並且沒有定義TRUE參數,就會出錯。

   現在轉到目錄c: emp,打開test.txt,你可以看到如下的信息:

User's name
User's home page
User's email

   當然,這些單詞可以被輸入在表單中的任何內容所替換。

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved