導入excel文件錯誤

Question

我在YouTube上找到了一個視頻，演示瞭如何將excel文件導入到datagridview。我收到錯誤：無法找到可安裝的ISAM。

這是我的代碼，我做錯了什麼？

private void button1_Click(object sender, EventArgs e) 
    { 
     OleDbConnection conn = new OleDbConnection(); 
     conn.ConnectionString = @"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Nick\Desktop\Pricing2.xlsx" + @";Exended Properties=""Excel 8.0;HDR=No;IMEX=1;ImportMixedTypes=Text;TypeGuessRows=0"""; 

     OleDbCommand command = new OleDbCommand 
     (
      "SELECT PartNumber,ShortDescription,RetailPrice,JobberPrice,BasePrice,YourDiscount,YourPrice,LongDescription FROM [Pricing$]",conn 
     ); 
     DataSet ds = new DataSet(); 
     OleDbDataAdapter adapter = new OleDbDataAdapter(command); 
     adapter.Fill(ds); 
     dataGridView1.DataSource = ds.Tables[0]; 
    } 

Answer 1

你有你的連接字符串中一個錯字：

Exended Properties= 

應該是：

Extended Properties= 

此外，我建議你你的代碼略有改善其中包括妥善處置一次性資源：

using (var conn = new OleDbConnection(@"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Nick\Desktop\Pricing2.xlsx;Extended Properties=""Excel 12.0 Xml;HDR=YES"";")) 
using (var cmd = conn.CreateCommand()) 
{ 
    conn.Open(); 
    cmd.CommandText = "SELECT PartNumber,ShortDescription,RetailPrice,JobberPrice,BasePrice,YourDiscount,YourPrice,LongDescription FROM [Pricing$]"; 
    using (var adapter = new OleDbDataAdapter(cmd)) 
    { 
     adapter.Fill(ds); 
    } 
} 

Answer 2

從我的經驗。只有Excel 97-2003的作品。

代碼在VB！

Private Sub DodajExcel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DodajExcel.Click 
OpenFileDialog2.Filter = "Excel Files (*.xls)|*.xls|All Files (*.*)|*.*" 
If OpenFileDialog2.ShowDialog = Windows.Forms.DialogResult.OK Then 
    Dim XLSPathx As String = OpenFileDialog2.FileName 
End If 

Dim connectionStringTemplate As String = _ 
"Provider=Microsoft.ACE.OLEDB.12.0;" + _ 
"Data Source={0};" + _ 
"Extended Properties=""Excel 12.0;HDR=Yes;IMEX=1""" 
Dim XLSPath As String = OpenFileDialog2.FileName 
Dim connectionString As String = String.Format(connectionStringTemplate, XLSPath) 
Dim sqlSelect As String = "SELECT * FROM [Arkusz1$];" 
' Load the Excel worksheet into a DataTable 
Dim workbook As DataSet = New DataSet() 
Dim excelAdapter As System.Data.Common.DataAdapter = New System.Data.OleDb.OleDbDataAdapter(sqlSelect, connectionString) 
Try 
    excelAdapter.Fill(workbook) 
    Dim worksheet As DataTable = workbook.Tables(0) 
    DataGridView1.DataSource = worksheet 


Catch 
    End Try 

末次