ASPでファイルの入出力

基本的なことですが、_φ(°-°=)メモメモ


ファイルへ書き込む時のサンプル

<%

'ファイルシステムオブジェクトの作成
Set fs = CreateObject("Scripting.FileSystemObject")
'ファイルを開く(上書き)
Set output = fs.CreateTextFile("c:\inetpub\wwwroot\output.data", True)

'出力
output.write "文字列をファイルへ出力します" & vbCrLf

'ファイルを閉じる
output.close
'オブジェクトの破棄
set output = nothing
set fs = nothing

%>


ファイルから読込む時のサンプル

<%

'ファイルシステムオブジェクトの作成
Set fs = CreateObject("Scripting.FileSystemObject")
'ファイルを開く
Set read = fs.CreateTextFile("c:\inetpub\wwwroot\input.data", False)

'読込み
Do While read.AtEndOfStream <> True

str = read.ReadLine
response.write "> " & str & vbCrLf

Loop
'ファイルを閉じる
read.close
'オブジェクトの破棄
set read = nothing
set fs = nothing

%>


CreateTextFileの第2引数で上書きの設定をします。Trueだと上書きされます。
ファイルのパスは絶対パスのみ有効(らしい)

もしかしたらOpenTextFileを使ったほうが良いかもしれません。

ファイルへの出力時は、改行コードを「vbCrLf」を使用しましょう。