使用GetSchema获取第一个表

Question

我正在尝试获取Excel文件的第一张纸：

try
{
    string constring = "Provider=Microsoft.ACE.OLEDB.12.0;" + "Data Source=" + filepath + ";Extended Properties=Excel 12.0;";
    OleDbConnection conn = new OleDbConnection(constring);
    conn.Open();
    DataTable myTables = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, new object[] { null, null, null, "TABLE" });
    var myTableName = conn.GetSchema("Tables").Rows[0].Table;
    string sqlquery = string.Format("SELECT * FROM [{0}]", myTableName);
    OleDbDataAdapter da = new OleDbDataAdapter(sqlquery, conn);
    da.Fill(dt); 
    MessageBox.Show(Convert.ToString(dt.Rows.Count));
    return dt;
}
catch (Exception e)
{
    MessageBox.Show(e.Message, "Error", MessageBoxButton.OK, 
    MessageBoxImage.Error);
    return dt;
}

我在做什么错？

编辑：

显示以下错误：Microsoft Office Access数据库引擎找不到“表”对象。

这适用于Visual Basic：

Try
    Dim constring As String = "Provider=Microsoft.ACE.OLEDB.12.0;" &
                                        "Data Source=" & filepath &
                                        ";Extended Properties=Excel 12.0;"
    Dim conn As New OleDbConnection(constring)
    conn.Open()
    Dim myTables As DataTable = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, New Object() {Nothing, Nothing, Nothing, "TABLE"})
    Dim myTableName = conn.GetSchema("Tables").Rows(0)("TABLE_NAME")
    Dim sqlquery As String = String.Format("SELECT * FROM [{0}]", myTableName)
    Dim da As New OleDbDataAdapter(sqlquery, conn)
    da.Fill(dt)
    conn.Close()
    MsgBox(dt.Rows.Count)
    Return dt
Catch ex As Exception
    MsgBox(Err.Description, MsgBoxStyle.Critical)
    Return dt
End Try

我正在尝试使用C＃复制它。

错误行似乎是这一行：

var myTableName = conn.GetSchema("Tables").Rows[0].Table;

它试图在VB代码中复制以下行：

Dim myTableName = conn.GetSchema("Tables").Rows(0)("TABLE_NAME")

Answer 1

这里全部放在一起。文件路径字符串前面的@符号采用字符串，并且不使用\进行转义。在插值字符串中，我们确实希望对嵌入式双引号使用转义字符。使用块可确保您的连接被关闭和处置。我在组合框中显示了结果。

 private void opCode()
    {
        string filePath = @"C:\Users\xxx\Documents\Excel\TestImport.xlsx";
        string conString = $"Provider = Microsoft.ACE.OLEDB.12.0; Data Source = {filePath} ; Extended Properties = \"Excel 12.0; HDR = YES;\"";
        Debug.Print(conString);
        DataTable dt;
        using (OleDbConnection cn = new OleDbConnection(conString))
        {
            cn.Open();
            dt = cn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, null);
        }
        var exSheets = (from dRow in dt.AsEnumerable()
                        select dRow["TABLE_Name"]).ToArray();
        cbo1.Items.AddRange(exSheets);
    }

****注意：Linq查询不一定会以 工作簿中显示的顺序