VBSでテキストファイルを作成

こんにちは。
set fso = createobject("Scripting.FileSystemObject")
fso.createfolder("倉庫")

を実行すると、実行したスクリプトが存在する場所に「倉庫」という名のフォルダが作成されます。

その倉庫というフォルダの中にテキストファイルを作成するにはどうすればよいでしょうか？

set fso = createobject("Scripting.FileSystemObject")
fso.createfolder("倉庫")
set fo = fso.opentextfile(FILENAME)
close.fo

相対的にファイルの場所を指定する方法がわかりません。
絶対パスでないとだめなのでしょうか？

No.1 ベストアンサー 回答者： kntr1 回答日時： 2002/06/02 17:51

これは、wshですよね。

Set fo = fso.CreateTextFil("倉庫\xxx.txt",True)

多分これでいいと思うのですが、どうでしょう？

この回答への補足

こんばんは。ウィンドウズスクリプトホストです。　　拡張子がVBSです。　wshなのかvbsなのか区別がよくわかってません。　
--------------------------
'相対パスでファイルを作成
set fso = createobject("Scripting.FileSystemObject")
fso.createfolder("倉庫")
set fo = fso.opentextfile("倉庫\aaa.txt",true)
fo.close
-----------------------------

上記のスクリプトを実行したところ・・
スクリプト:C:\WINDOWS\デスクトップ\相対パスでファイルを作成.vbs
行:4
文字:1
エラー:プロシージャの呼び出し、または引数が不正です。
コード:800A0005
ソース: Microsoft VBScript 実行時エラー

とエラーになってしましました。
「倉庫」フォルダは作成できたのですが、aaa.txtを作成することができませんでした。

なにが足りないのでしょうね。昨日からずっと悩んでます。　

補足日時：2002/06/02 19:17

この回答へのお礼

CreateTextFile と opentextfile とを勘違いしました。
おかげでうまく動きました。

ありがとうございました。

お礼日時：2002/06/02 19:57