CSV Delimited

Hi All
ConnCSV = "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties='text;HDR=Yes;FMT=Delimited';Data Source=D:\ff\"
            Dim ds As New DataSet()
            Dim str As String
            Dim filename as String = "book1.csv"
           
            Dim sqlSelect As String
            Dim objOleDBConn As OleDbConnection
            Dim objOleDBDa As OleDbDataAdapter
            objOleDBConn = New OleDbConnec ...