VBS(VBScript)サポート&サンプルTOPへ

VBS(VBScript)によるテキストファイルに追記する方法を紹介

テキストファイルに追記する方法

サンプルソース


Dim fs
Dim fi

Set fs = WScript.CreateObject("Scripting.FileSystemObject")
Set fi = fs.OpenTextFile("C:\test.txt", 8, True)   ' 2の場合上書き、8の場合追記
fi.WriteLine("test!")   ' writeだったら改行なし、writelineだったら改行あり

↑C:\test.txtのファイルを開く。※バッチファイルや、exeファイル等のプラグラムの場合だと実行を行う。



  

戻る




Copyright (C) VBS(VBScript)サポート&サンプル by wannko All Rights Reserved.
お問合せ先 ⇒ nachiko★wannko.net(★を@に変更して下さい。)