替换记录集中的特殊字符

Question

[我有一个filds中带有双引号（“）的CSV文件。当我尝试将数据上传到记录集时，我崩溃了。我在VBA中使用了以下代码：

Dim rscsv As ADODB.Recordset
Dim cncsv As ADODB.Connection

Set cncsv = New ADODB.Connection

cncsv.ConnectionString = "Driver=Microsoft Access Text Driver (*.txt, *.csv);Dbq="C:\Test\";Extensions=csv"
cncsv.Open


Set rscsv = New ADODB.Recordset
rscsv.Open "select * from " & fileName, cncsv, adOpenStatic, _
adLockReadOnly, adCmdText

我在记录集中获取错误数据，并在错误代码“ rscsv.Open” select * from ...“中出现错误” 94：无效使用Null“。在双引号及之后的字段中对数据进行了修剪它的所有字段都为Null值。

例如，如果我有以下CSV数据

  1            2            3            4
AAAA         BB"BB          123          456
...获得我的代码后

  1            2            3            4
AAAA         BB           Null          Null
如何使用替换选项上传数据（即类似这样的 Replace（'“'，''））？

我在某些fild中有一个带双引号（“）的CSV文件。当我尝试将数据上传到记录集时，我崩溃了。我在VBA中使用了以下代码：Dim rscsv As ADODB.Recordset Dim cncsv As ...

Answer 1

建立连接时，请使用FMT =分隔。这是一个简单的例子：