私はこのコードを持っています
'Open a file for reading
'Get a StreamReader class that can be used to read the file
Dim objStreamReader As StreamReader
Dim variableArray(20) As String
objStreamReader = File.OpenText(filePath)
'Read one line at a time
Dim someString As String
Dim variableNum As Integer = 0
'Iterate through lines
While objStreamReader.Peek() <> -1
someString = objStreamReader.ReadLine()
variableArray(variableNum) = someString
variableNum = variableNum + 1
End While
For Each line As String In variableArray
Next
objStreamReader.Close()
結果をログファイルに出力し、各行に追加され、「|」で区切られたvbscriptがあります。2つの列のみがあります。
これがVBScriptコードのスニペットです
f1.WriteLine("Server Name " & "|" & strName)
f1.WriteLine("OS Name: " & "|" & strCaption)
f1.WriteLine("OS Version: " & "|" & strVersion
f1.WriteLine("CSD Version: " & "|" & strCSDVer
f1.WriteLine("Serial Number: " & "|" & strSerial
コードのForEach部分にこれを読み取らせ、分解して、結果を示すテーブルを作成するにはどうすればよいですか。