VBA中的ADODBlogging集说,如果没有,excel字段是空的

我有一个Excel工作表,我需要在我的Access数据库中导入。 该表看起来像这样:

date接收标识项目N°QUANTITE RECUE
 06/01/2010 DVD-Sex&the City PCR-PA21550167 5
 06/01/2010 DVD-Avatar Natie 2 PCR-PA21550209 10 

然后我使用adodb将这个文件传输到数据库中:

Dim rs2 As New ADODB.Recordset Dim cnn2 As New ADODB.Connection Dim cmd2 As New ADODB.Command Dim intField As Integer Dim strFile As String strFile = fncOpenFile If strFile = "" Then Exit Sub With cnn2 .Provider = "Microsoft.Jet.OLEDB.4.0" .ConnectionString = "Data Source=" & strFile& "; " & "Extended Properties=Excel 8.0" .Open End With Set cmd2.ActiveConnection = cnn2 cmd2.CommandType = adCmdText cmd2.CommandText = "SELECT * FROM [PCR$]" rs2.CursorLocation = adUseClient rs2.CursorType = adOpenDynamic rs2.LockType = adLockOptimistic rs2.Open cmd2 While Not rs2.EOF strNaam = rs2.Fields(3).Value Loop 

现在我的问题是:某些领域有文字。 那么字段值应该是item0001 ,但据报道是NULL

当字段有一个正常的号码,它工作正常。

奇怪的是:表单中还有其他文本字段,它们都是FINE。

在扩展属性部分更具体(不要忽略内部引号)。

特别是,请尝试Extended Properties="Excel 8.0;HDR=Yes;IMEX=1"以允许混合数字和文本数据。

更多详情,请访问http://connectionstrings.com/