BUG: Excel ODBC Driver Disregards the FirstRowHasNames or Header Setting

Symptoms

When you use the Microsoft Excel Open Database Connectivity (ODBC) Driver to connect to an Excel worksheet as an ODBC data source, the driver assumes by default that the first row of worksheet data contains column headers (field names). According to the driver documentation, the optional FirstRowHasNames connection setting can be used to change this default behavior by using 0 for False and 1 for True. However, in fact, the driver disregards this setting and the first row of data is always treated as column headings. If the first row of data does not contain column headings or other entries, the effective result is that the first row of data "disappears."

Cause

The value of the FirstRowHasNames or Header (HDR) parameter is never being passed to the Excel ODBC Driver.

Resolution

The HDR= setting is available and functional when you use the Microsoft Jet OLE DB Provider and its Excel ISAM driver. Therefore, the best solution is to use the Jet Provider rather than the Excel ODBC driver.

Because the Excel ODBC driver always assumes that the first row contains field names, the first row must always contain either valid field names, or dummy entries that the developer is willing to disregard.

Status

Microsoft has confirmed that this is a bug in the Microsoft products that are listed at the beginning of this article.

More Information

Steps to Reproduce Behavior

  1. Create a new Excel workbook and save it with the default name in the folder where you will create your Visual Basic test project.
  2. In cell A1, fill a few cells in the first column with random data.
  3. Create a new Visual Basic project and set a reference to ActiveX Data Objects (ADO).
  4. Enter and run the following code:
    Private Sub Form_Load()
    Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    Set cn = New ADODB.Connection
    With cn
    .Provider = "MSDASQL"
    .ConnectionString = "Driver={Microsoft Excel Driver (*.xls)};DBQ=" & App.Path & "\Book1.xls;FirstRowHasNames=0;"
    .Open
    End With
    Set rs = New ADODB.Recordset
    With rs
    Set .ActiveConnection = cn
    .Source = "[Sheet1$]"
    .Open
    End With
    Debug.Print rs.Fields(0).Value
    Debug.Print rs.Fields(0).Name
    rs.Close
    cn.Close
    End Sub
Normally you would expect to see the Excel driver assign the default field name "F1" to your column of data and to display the data beginning with the first record that you entered in cell A1. However, note that in the Debug window, the value that you entered in cell A2 printed as the value of the first record in spite of your having set FirstRowHasNames to False. The value in cell A1 has "disappeared" to become the field name for the column.
Propriedades

ID do Artigo: 288343 - Última Revisão: 03/07/2009 - Revisão: 1

Comentários