Scripting 如何在经典asp中标记csv文件的图表数据

下面是我从URL读取的图表数据的数据示例 数组“”3 8 Y 25 75 100 125 150 175 200 225 “A”38675327 “B”19 7 8 4 7 2 5 ‘C’8736569118

现在，我想将这些数据保存到csv文件中，如下所示

ARRAY ' ' 3 8 Y 25 75 100 125 150 175 200 225 'A' 3 8 6 7 5 3 2 7 'B' 1 9 7 8 4 7 2 5 'C' 8 7 3 6 56 9 111 8 时间A B c 25 3 1 8 75 8 9 7 100 6 7 3 125 7 8 9 150 5 4 56 175 3 7 9 200 2 2 111 225 7 5 8 实际上，我必须首先将数据读入一个数组，其中每个元素将包含数据文件的一行，现在我必须将每个元素按空间分割，并将其存储在二维数组中，现在对于每个数组的第I个索引，我必须创建一个分开的行，然后将“\n”放在行的末尾，最后将其保存到csv文件。

我对vb脚本和经典asp的语法了解不多，这就是我面临此问题的原因。请帮助我开始：

Time A B c 25 3 1 8 75 8 9 7 100 6 7 3 125 7 8 9 150 5 4 56 175 3 7 9 200 2 2 111 225 7 5 8 测试：

输出：

  Dim sFSpecI : sFSpecI = "..\Data\f1.txt"
  Dim sFSpecO : sFSpecO = "..\Data\f1.csv"
  Dim sCol1   : sCol1   = "Time" ' dangerous - possibly reserved in SQL
  WScript.Echo goFS.OpenTextFile(sFSpecI).ReadAll()
  doReOrder sFSpecI, sFSpecO, sCol1
  WScript.Echo goFS.OpenTextFile(sFSpecO).ReadAll()

  Dim sFSpecI : sFSpecI = "..\Data\f1.txt"
  Dim sFSpecO : sFSpecO = "..\Data\f1.csv"
  Dim sCol1   : sCol1   = "Time" ' dangerous - possibly reserved in SQL
  WScript.Echo goFS.OpenTextFile(sFSpecI).ReadAll()
  doReOrder sFSpecI, sFSpecO, sCol1
  WScript.Echo goFS.OpenTextFile(sFSpecO).ReadAll()

ARRAY ' ' 3 8
Y
25 75 100 125 150 175 200 225
'A' 3 8 6 7 5 3 2 7
'B' 1 9 7 8 4 7 2 5
'C' 8 7 3 6 56 9 111 8

"Time","A","B","C"
25,3,1,8
75,8,9,7
100,6,7,3
125,7,8,6
150,5,4,56
175,3,7,9
200,2,2,111
225,7,5,8