vb.net: Импорт текстового файла с разделителями табуляции для доступа к базе данных

Question

Может кто-нибудь сказать мне, почему мой код не импортирует текстовый файл Tab Delimited, но работает для текстовых файлов с разделителями-запятыми и как я могу заставить его работать для файлов Tab Delim?

Код как ниже

    Private Sub btnSelectFile_Click(sender As Object, e As EventArgs) Handles btnSelectFile.Click

    Dim AccessConn As New OleDb.OleDbConnection("Provider = Microsoft.ACE.OLEDB.12.0; Data Source= (Provider=Microsoft.ACE.OLEDB.12.0; Data Source= C:\Users\Me\Documents\ShipmentDB.accdb;")

    Dim FileName As String
    Dim FilePath As String
    Dim TargetPath As String
    Dim FilePathLength As Integer = 0

    'Get Text File Location that user need to import (AskForFile is a OpenDialogBox)

    AskForFile.Reset()
    AskForFile.Title = "Select File you want To inport"
    AskForFile.Filter = "Text File|*.txt|All Files|*.*"
    AskForFile.Multiselect = False
    AskForFile.InitialDirectory = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
    AskForFile.ShowDialog()

    FileName = AskForFile.SafeFileName.ToString
    TargetPath = AskForFile.FileName.ToString
    FilePathLength = Len(TargetPath) - Len(FileName)

    FilePath = TargetPath.Substring(0, FilePathLength)

    Try
        AccessConn.Open()

        Dim DeleteTable As New System.Data.OleDb.OleDbCommand("DROP TABLE AmazonData;", AccessConn)
        DeleteTable.ExecuteNonQuery()

        Dim AccessCommand As New System.Data.OleDb.OleDbCommand("SELECT *  INTO AmazonData FROM [Text;DATABASE=" & FilePath & "].[" & FileName & "]", AccessConn)
        AccessCommand.ExecuteNonQuery()

    Catch ex As Exception
        AccessConn.Close()
        MessageBox.Show("Error Occured")
        Exit Sub
    End Try

    MessageBox.Show("Process Complete. Check and verify the database")

    AccessConn.Close()

End Sub

Answer 1

Обратите внимание, что вы удаляете таблицу, а не удаляете данные. Попробуйте "удалить из AmazonData" вместо "DROP TABLE AmazonData" в первой команде.