0

VBScriptから始めるだけです：

このスクリプトは、テキスト ファイルからファイル パスを取得し、出力を画面に表示します。

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("c:\temp\log.txt", ForReading)
Const ForReading = 1
Dim arrFileLines()
i = 0
Do Until objFile.AtEndOfStream
Redim Preserve arrFileLines(i)
arrFileLines(i) = objFile.ReadLine
i = i + 1
Loop
objFile.Close
For Each strLine in arrFileLines
WScript.Echo strLine
Next

WScript.Echo strLine は、ファイルの名前を画面に表示します。

strLine に含まれる値と同じ名前のファイルを作成する方法はありますか?

私は実行してみました：

cscript vbscript > strLine

ただし、strLineに保存されているファイルではなく、「strLine」というファイルのみを作成します

任意の支援をいただければ幸いです

ありがとう

4

3 に答える 3

1

使用-ドキュメントSet tsX = objFS.CreateTextFile(strLine, True)でこのメソッドについて読んだ後。

アップデート：

コード内:

Option Explicit
Dim goFS : Set goFS = CreateObject("Scripting.FileSystemObject")
Dim tsNames : Set tsNames = goFS.OpenTextFile("fnames.txt")
Do Until tsNames.AtEndOfStream
   Dim tsX : Set tsX = goFS.CreateTextFile(tsNames.ReadLine())
   tsX.WriteLine "Abracadabra"
   tsX.Close
Loop
tsNames.Close
于 2013-05-22T21:00:58.510 に答える