BulkCopy In DB2

[Guy Zommer]

Hi,

I have the following code that is working in SQL Server, I would like to do the same but in DB2, what do I need to change in code to work in DB2?


Sub UploadToSQLServer()


Dim ExcelConnection As New System.Data.OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\guyz\Desktop\Borech.xlsm;Extended Properties=""Excel 12.0 Xml;HDR=Yes""")
ExcelConnection.Open()

Dim expr As String = "SELECT * FROM [Sheet1$]"

Dim objCmdSelect As OleDbCommand = New OleDbCommand(expr, ExcelConnection)
Dim objDR As OleDbDataReader
Dim SQLconn As New SqlConnection()

SQLconn.ConnectionString = ConnString
SQLconn.Open()


Using bulkCopy As SqlBulkCopy = New SqlBulkCopy(SQLconn)
bulkCopy.DestinationTableName = "Animal2"

Try
objDR = objCmdSelect.ExecuteReader
bulkCopy.WriteToServer(objDR)
objDR.Close()
SQLconn.Close()

Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Using
End Sub



Guy Zommer

Continue reading...