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/ 。
- 对象_connection的方法打开失败
- 如果工作表的第一行没有列名称,如何使用ADODB连接从Excel中检索数据?
- Microsoft.ACE.OLEDB.12.0当前logging集不支持尝试更新访问时收到的更新错误
- 从ADODBlogging集复制数据时,Excel表格丢失数字格式
- Excel工作表通过ADODB不一致的行为导出到Access
- Excel单元格ADODB.Recordset
- VBA – Excelmacros创buildAccess数据库并更新字段属性(date/时间格式)
- 在VBA中深度复制或克隆ADODBlogging集
- Excel的VBA的 – 连接到SQL与信任的连接(没有uid / pwd)