Dates, and number fields are just empty cells in the DataTable resulting from the select statement.<BR><BR>Any idea what might be wrong?<BR><BR>Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" _<BR> & "Data Source=" & strPath & strFile _<BR> & ";" & "Extended Properties=Excel 8.0;"<BR><BR> &#039; Create the connection object by using the preceding connection string.<BR> Dim objConn As New OleDbConnection(sConnectionString)<BR><BR> &#039; Open connection with the database.<BR> objConn.Open()<BR><BR> &#039; The code to follow uses a SQL SELECT command to display the data from the worksheet.<BR><BR> &#039; Create new OleDbCommand to return data from worksheet.<BR> Dim objCmdSelect As New OleDbCommand("SELECT * FROM [" & strWorkSheetName & "$]", objConn)<BR><BR> &#039; Create new OleDbDataAdapter that is used to build a DataSet<BR> &#039; based on the preceding SQL SELECT statement.<BR> Dim objAdapter1 As New OleDbDataAdapter<BR><BR> &#039; Pass the Select command to the adapter.<BR> objAdapter1.SelectCommand = objCmdSelect<BR><BR> &#039; Create new DataSet to hold information from the worksheet.<BR> Dim oDs As New DataSet<BR><BR> &#039; Fill the DataSet with the information from the worksheet.<BR> objAdapter1.Fill(oDs)<BR><BR> &#039; Clean up objects.<BR> objConn.Close()<BR> Return (oDs)<BR>