[ホーム] ＞ [VBScript FAQ 一覧] ＞ [ファイルを作成する (FilesystemObjectを使用したテキストファイル)]

ファイルを作成する (FilesystemObjectを使用したテキストファイル) | VBScript / VBA FAQ

以下の例では c:\temp\temp.txt というファイルを新規作成し this is a test. という文字を書き込みます。

test.vbsにサンプルコードを記載し、以下のコマンドを実行します。

cscript test.vbs

サンプル========================================
【test.vbs】

Dim WshShell
Dim Fso
Dim OTf

on error resume next
Set WshShell = CreateObject("Wscript.Shell")
Set Fso=CreateObject("Scripting.FilesystemObject")

Set OTf=Fso.OpenTextFile("c:\temp\temp.txt",2,True)

rem 1 =ファイルを読み取り専用として開きます。このファイルには書き込むことができません。
rem 2 =ファイルを書き込み専用として開きます。
rem 8 =ファイルを開き、ファイルの最後に追加して書き込みます。

OTf.WriteLine "this is a test."
If Err.Number <> 0 Then
Msgbox "Error=" & Err.Number
End If


================================================

[ホーム] ＞ [VBScript FAQ 一覧]