ファイルをcsvファイルに出力するバッチファイル

問題
溶液
注意

問題

私は固定フォルダ（すなわちc：folderfile1.csv）内の固定ファイルを探すWindowsのバッチファイルを書き、そして2番目のcsvファイル（すなわちc）にファイル名と最後に書かれた日付を出力するためにdirコマンドを使います。：folderfile2.csv） 出力は2列になっている必要があり、file2.csvを開くと次のようになります。

file1.csv 10/14/2008 15:38

これはかなり簡単なバッチのように思えますが、出力をこれら2つの属性だけに限定してfile2.csvの最初の2列と1行に配置するのに苦労しています。

任意の助けは大歓迎です。ありがとうございます。

溶液

必要なスクリプトは次のとおりです。

____________________開始コード__________________

 Dim Filepath Dim Filename Dim OutputFile Filepath = "c：test \" 'ファイルパスを指定するには、これを編集しますFilename = "file1.csv"'最後に編集した日時が必要なファイルの名前OutputFile = "file2.csv" 'File to objFSO = CreateObject（ "Scripting.FileSystemObject"）に結果を出力します。objFSO.FileExists（FilePath＆OutputFile）でなければ、objFile = objFSO.CreateTextFile（Filepath＆OutputFile）に設定Wscript.sleep（2000） 'ファイルの作成中に一時停止objFSO.FileExists（Filepath＆Filename）の場合、objFile = objFSO.GetFile（Filepath＆Filename）のように設定します。Lastmodifieddate = objFile.DateLastModified Const ForWriting = 2 Set outputFile = objFSO.OpenTextFile（Filepath＆ "file2.csv"、ForWriting） WriteFile.Writeファイル名＆ "、"＆objFile.DateLastModified '出力ファイルにファイル名と最終更新日を書き込みますOutputFile.Close End設定されている場合objFSO = Nothing

____________________終了コード__________________

5行目、6行目、7行目に設定されている3つの変数、filepath、filename、およびoutput fileを変更して、指定したパスとファイル名を選択し、7行目に同じパスにファイルを作成できます。

そのコードをtest.vbsファイルとして保存する場合は、バッチファイルに「Call test.vbs」という行を入力する必要があります。明らかに、vbsファイルの名前を変更した場合は、バッチファイルでその参照を変更する必要があります。