Dim oConn As System.Data.OleDb.OleDbConnection
Dim oAdapter As System.Data.OleDb.OleDbDataAdapter
 
oConn = New System.Data.OleDb.OleDbConnection( _
  "Provider=Microsoft.Jet.OLEDB.4.0;" & _
              "Data Source=" & OpenFileDialogExcel.FileName & ";" & _
              "Extended Properties=Excel 8.0;")
oAdapter = New System.Data.OleDb.OleDbDataAdapter("SELECT * FROM [Tabelle1$]", _
  oConn)
            Try
                oAdapter.AcceptChangesDuringFill = False
                oAdapter.Fill(DataSet1, "EXCEL")
catch...
usw.

--
Wann und wo ? Denn, Dort....!

VB.NET 2005 EE / MySQL / MSSQL EE