Import CSV file into DB2 database table

See more:

VB6

Hi,

How to import data from CSV file into DB2 database table using VB6.0, I used below code but getting error. Please help me.


Dim cnn As New ADODB.Connection
Dim strSQL As String
Dim path As String
DBCONSRT = "Driver={IBM DB2 ODBC DRIVER};Database=dbname;hostname=remoteserver;port=3700;protocol=TCPIP; uid=issspcp; pwd=password;
Set cnn = CreateObject("ADODB.Connection")
cnn.ConnectionString = DBCONSRT
cnn.Open

path = txtSSFile.Text
strSQL = "BULK INSERT sspc.tempdata2 FROM '" & path & _
"' WITH ( FIELDTERMINATOR = '|', ROWTERMINATOR = '\n',DATAFILETYPE = 'native')"

cnn.Execute strSQL

cnn.Close

Set cnn = Nothing