[FAQ CENTER トップ]
[VBScript FAQ トップへ]

VBScript / VBA FAQ


スポンサード リンク

【質問】 ファイルを作成する (FilesystemObjectを使用したテキストファイル)

スポンサード リンク

【答え】
以下の例では 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 トップへ]
[FAQ CENTER トップ]





(ご注意) 本サイト内の内容を使用して発生したいかなる時間的損害、金銭的損害あるいはいかなる損害に対して、いかなる人物も一切の責任を負いません。あくまでも個人の判断で使用してください。
本サイト内掲載されている情報は、著作権法により保護されています。いかなる場合でも権利者の許可なくコピー、配布することはできません。
このページはリンクフリーです。(このページへの直接リンクも可能です。)
雑誌等での紹介は特に連絡は不要です。
Copyright(c) tooljp.com 2007-2014