VB.Net – SQL Tabelle kopieren mit SqlCommand und ExecuteReader

VB.Net – SQL Tabelle kopieren mit SqlCommand und ExecuteReader

So wird es gemacht:

    '============================================
    ' VB.NET Beispiel in Visual Basic .Net
    ' © wilfried.bitz@bridgesolution.de
    '============================================
    Public Function SQL_Table_Copy( _
        ByVal strTable As String, _
        ByVal strTable_NewName As String, _
        ByVal myLP As LP_Structure) As Boolean
 
        Dim strProzedur As String = "SQL_Table_Copy"
        Dim myDV As DataView
        Dim strSQL As String = _
        "SELECT * from " & strTable & " "
 
        Try
 
            Dim mySqlConnection As SqlConnection = SQL_ConnectionInit(myLP, True)
            Dim mySqlConnection_2 As SqlConnection = SQL_ConnectionInit(myLP, True)
 
            Using mySqlConnection
                Dim commandSourceData As SqlCommand = New SqlCommand(strSQL, mySqlConnection)
                Dim reader As SqlDataReader = commandSourceData.ExecuteReader
 
                Using mySqlConnection_2
                    Using bulkCopy As SqlBulkCopy = _
                    New SqlBulkCopy(mySqlConnection_2)
                        bulkCopy.DestinationTableName = strTable_NewName
                        'Write from the source to the destination.
                        bulkCopy.WriteToServer(reader)
                        reader.Close()
                    End Using
 
                End Using
 
            End Using
 
 
            SQL_Table_Copy = True
 
        Catch ex As Exception
        Finally
            myDV = Nothing
 
        End Try
 
    End Function

Spendierst du mir eine Tasse Kaffee? Ich würd mich riesig freuen. DANKE !! 🙂

Author: admin

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert.