Top > VBScript > FileSystemObject


CreateObject("Scripting.FileSystemObject")

Dim objFileSys
Dim objText

Set objFileSys = CreateObject( "Scripting.FileSystemObject" )

Set objText = objFileSys.OpenTextFile( "xxxxx.txt" ).DateCreated

Do Until objText.AtEndOgStream = True
    WScript.Echo objText.ReadLine
Loop

objText.Close
Set objText = Nothing
Set objFileSys = Nothing

テキストファイルの中身を1行ずつ全て表示するサンプルです。

FileSystemObjectを使用すればもっと多くのファイル情報を取得できます。
ファイル生成日や更新日などの情報を読み込むだけでなく、コピーや移動、削除などの操作も可能です。

MSDNのリファレンスはこちら



Copyright © 2015 AchaPorutePiipo All Rights Reserved.