WSH/ファイルを新規に作成しテキストを書き込むサンプルコード
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
開始行:
#navi(../)
* ファイルを新規に作成しテキストを書き込むVBScriptサンプ...
この資料はVBScriptを使用しテキストファイルを新規に作成し...
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* 関連記事 [#g30d6417]
-[[ファイルを行単位で読み込む方法・ReadLineメソッド>WSH/...
-[[既存ファイルをにテキストを追加書き込みするサンプルコー...
-[[ファイルの存在チェックを行う・FileExists>WSH/ファイル...
-[[ファイルの削除を行う方法・DeleteFile>WSH/ファイルの削...
-[[ファイルまたはフォルダーを別の場所にコピーする・Copy>W...
-[[FileSystemObjectに含まれているオブジェクトおよびコレク...
-[[FileSystemObjectのDriveオブジェクトとDrivesコレクショ...
-[[FileSystemObjectのFileオブジェクトとFilesコレクション>...
-[[FileSystemObjectのFolderオブジェクトとFoldersコレクシ...
-[[FileSystemObjectのTextStreamオブジェクトの調査>WSH/Fil...
* テキストファイルの新規作成およびテキスト書き込みのサン...
以下にテキストファイルを新規に作成し、作成したテキストフ...
** サンプルコード [#sb829521]
OpenTextFileメソッドとCreateTextFileメソッドを利用したサ...
下記のの2つのVBScriptサンプルコードはまったく同じ動作をし...
*** OpenTextFileメソッド使用例 [#h38cd307]
#ref(write1.vbs)
Set fso = CreateObject("Scripting.FileSystemObject")
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Set tso = fso.OpenTextFile("text1.txt", ForWriting, true)
tso.Write("foo")
tso.WriteLine("bar")
tso.WriteBlankLines(1)
tso.WriteLine("hoge")
tso.Write("hello" + vbCrLf + "world" + vbCrLf)
tso.Close
OpenTextFileの引数のForWritingは書き込みを指定。~
3番目の引数のtrueは、上書き指定となっています。
*** CreateTextFileメソッド使用例 [#sdeeec13]
#ref(write2.vbs)
Set fso = CreateObject("Scripting.FileSystemObject")
Set tso = fso.CreateTextFile("text2.txt", true)
tso.Write("foo")
tso.WriteLine("bar")
tso.WriteBlankLines(1)
tso.WriteLine("hoge")
tso.Write("hello" + vbCrLf + "world" + vbCrLf)
tso.Close
CreateTextFileの2つ目の引数trueはOpenTextFile同様に上書き...
** サンプルコードの実行結果 [#ne16e3de]
以下にサンプルコードの実行結果を記します。~
ファイルに出力される結果は同じになります。
*** 両VBScriptの動作説明 [#p4341006]
Scripting.FileSystemObjectを作成し、OpenTextFileメソッド...
あとは、TextStreamオブジェクトのWrite, WriteLine, WriteBl...
また、改行定数であるvbCrLfによる改行も動作することを確認...
*** OpenTextFileメソッド使用サンプルコードの実行結果 [#w6...
C:\wsh>cscript /nologo write1.vbs
C:\wsh>type text1.txt
foobar
hoge
hello
world
*** CreateTextFileメソッド使用サンプルコードの実行結果 [#...
C:\wsh>cscript /nologo write2.vbs
C:\wsh>type text2.txt
foobar
hoge
hello
world
#htmlinsertpcsp(win-btm.html,win-sp.html)
終了行:
#navi(../)
* ファイルを新規に作成しテキストを書き込むVBScriptサンプ...
この資料はVBScriptを使用しテキストファイルを新規に作成し...
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* 関連記事 [#g30d6417]
-[[ファイルを行単位で読み込む方法・ReadLineメソッド>WSH/...
-[[既存ファイルをにテキストを追加書き込みするサンプルコー...
-[[ファイルの存在チェックを行う・FileExists>WSH/ファイル...
-[[ファイルの削除を行う方法・DeleteFile>WSH/ファイルの削...
-[[ファイルまたはフォルダーを別の場所にコピーする・Copy>W...
-[[FileSystemObjectに含まれているオブジェクトおよびコレク...
-[[FileSystemObjectのDriveオブジェクトとDrivesコレクショ...
-[[FileSystemObjectのFileオブジェクトとFilesコレクション>...
-[[FileSystemObjectのFolderオブジェクトとFoldersコレクシ...
-[[FileSystemObjectのTextStreamオブジェクトの調査>WSH/Fil...
* テキストファイルの新規作成およびテキスト書き込みのサン...
以下にテキストファイルを新規に作成し、作成したテキストフ...
** サンプルコード [#sb829521]
OpenTextFileメソッドとCreateTextFileメソッドを利用したサ...
下記のの2つのVBScriptサンプルコードはまったく同じ動作をし...
*** OpenTextFileメソッド使用例 [#h38cd307]
#ref(write1.vbs)
Set fso = CreateObject("Scripting.FileSystemObject")
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Set tso = fso.OpenTextFile("text1.txt", ForWriting, true)
tso.Write("foo")
tso.WriteLine("bar")
tso.WriteBlankLines(1)
tso.WriteLine("hoge")
tso.Write("hello" + vbCrLf + "world" + vbCrLf)
tso.Close
OpenTextFileの引数のForWritingは書き込みを指定。~
3番目の引数のtrueは、上書き指定となっています。
*** CreateTextFileメソッド使用例 [#sdeeec13]
#ref(write2.vbs)
Set fso = CreateObject("Scripting.FileSystemObject")
Set tso = fso.CreateTextFile("text2.txt", true)
tso.Write("foo")
tso.WriteLine("bar")
tso.WriteBlankLines(1)
tso.WriteLine("hoge")
tso.Write("hello" + vbCrLf + "world" + vbCrLf)
tso.Close
CreateTextFileの2つ目の引数trueはOpenTextFile同様に上書き...
** サンプルコードの実行結果 [#ne16e3de]
以下にサンプルコードの実行結果を記します。~
ファイルに出力される結果は同じになります。
*** 両VBScriptの動作説明 [#p4341006]
Scripting.FileSystemObjectを作成し、OpenTextFileメソッド...
あとは、TextStreamオブジェクトのWrite, WriteLine, WriteBl...
また、改行定数であるvbCrLfによる改行も動作することを確認...
*** OpenTextFileメソッド使用サンプルコードの実行結果 [#w6...
C:\wsh>cscript /nologo write1.vbs
C:\wsh>type text1.txt
foobar
hoge
hello
world
*** CreateTextFileメソッド使用サンプルコードの実行結果 [#...
C:\wsh>cscript /nologo write2.vbs
C:\wsh>type text2.txt
foobar
hoge
hello
world
#htmlinsertpcsp(win-btm.html,win-sp.html)
ページ名: