ファイルの書き出し
処理結果を外部テキストに書き出すコードです

   Set fs = CreateObject("Scripting.FileSystemObject")
   Set jwtmp = fs.CreateTextFile("jwc_temp.txt", True)
   Set jwtmp = fs.OpenTextFile("jwc_temp.txt", 8)
       jwtmp.writeline("書き出す内容")
   jwtmp.close

最初の3行はプロシージャの先頭に書いておきます。
最後の「jetmp.close」は最後に書いておきます。

主役は4行目の「jwtmp.writeline("書き出す内容")」で、処理内容をココに記述していきますのでココがふくれます。
Hino 23:54 2007.01.24 Wed
　署名　
　内容　
　　　　　　
新しい記事
　題名　
　署名　 　File
　本文