1

我正在尝试从外部 csv 文件中加载数据，该文件在插入 SQL 表之前需要进行处理。读取文件没问题，但是当我尝试遍历流并使用 SPLIT 函数加载数组时，出现“预期语句结束”错误。

Do While Not txtFile.AtEndOfStream

    strText = txtFile.ReadLine

    Dim dataArray() As String = Split(strText, ",")    -- Here's where it breaks

    ...

    build sql statement to insert using the zero based array

    RS.Open strSQL, dbConn, adOpenKeyset

Loop

txtFile.Close

我查看了 BOL 和 MSDN，但仍然出现错误。

4

2 回答 2

2

VBScript 不支持类型变量。VBScript 不支持在 Dim 语句中赋值。采用：-

Dim dataArray()
dataArray = Split(strText, ",")

然而，既然这是 DTS 任务，为什么不在转换中创建文本 csv 数据源，而不是手动创建 VBScript 代码来使用 CSV。

于 2009-06-23T13:21:49.020 回答
1

从内存 SQL 2k DTS 使用 vb 脚本，因此没有类型。

Dim dataArray = split(strText,",")
于 2009-06-23T13:21:33.777 回答