none
Как экспортировать DataTable в базу данных. RRS feed

  • Вопрос

  • Помогите с алгоритмом экспорта DataTable в базу данных.

    Пытался написать, но возникает вопрос:

    как конвертировать типы данных из DataTable в типы MSSQL?

    Или может по другому это решается.

    Заранее благодарю.

        Sub exportToAccess(tblExp As DataTable, connectionString As String)
            Dim conn As New OleDbConnection(connectionString)
            Try
                conn.Open()
                Dim tblExpName As String = tblExp.TableName
                Dim cmd As OleDbCommand
                'создание таблицы в база данных
                cmd = New OleDbCommand("CREATE TABLE " & tblExpName, conn)
                cmd.ExecuteNonQuery()
                Dim strQuery As String = ""
                For Each col As DataColumn In tblExp.Columns
                    'добавление столбцов в таблицу, как конвертировать тип данных из DataTable в тип MSSQL?
                    cmd = New OleDbCommand("ALTER TABLE " + tblExpName + " ADD COLUMN " & col.ColumnName & " VARCHAR(255) NULL;", conn)
                    cmd.ExecuteNonQuery()
                Next
            Catch ex As Exception
                MsgBox(ex.ToString)
            Finally
                conn.Close()
            End Try
        End Sub

    18 июня 2014 г. 16:02

Ответы