run-time error '-2147467259(80004005)':

please help me out i getting an error

[Mysql][ODBC 5.2(W) Driver][mysqld-5.6.16-log]Incorrect integer value;'WDS_ID'for column 'wds_id' at row 1

Dim conn As New ADODB.Connection
Dim server_name As String
Dim database_name As String
Dim user_id As String
Dim password As String
Dim database_table As String
Dim count As Integer
Dim cell As String
'Dim cell_1 As String
Dim cell_2 As String
Dim count_2 As Integer
Dim count_3 As Integer

Do Until count = aHeight

'repopulate the first cell
cell_2 = "'" & esc(array_values(count_2, 1))

'Populate the cell value
Do Until count_3 = aWidth
cell_2 = cell_2 & "'" & ", " & "'" & esc(array_values(count_2, (count_3 + 1)))
count_3 = count_3 + 1
Loop

cell_2 = cell_2 & "'" 'add the last ' to the name

'MsgBox (cell) 'debug
'MsgBox (cell_2) 'debug

'Run the query
strSQL = "INSERT INTO " & database_table & " (" & cell_1 & ") VALUES (" & cell_2 & ")"
'MsgBox (strSQL) 'debug
conn.Execute (strSQL) 'execute the above query

'Reset the variables for the loop
count_2 = count_2 + 1
count = count + 1
count_3 = 1
cell_2 = ""
Loop

i am still getting an error same

let me know what i do next to overcome this issue still i am getting the same problem

i have used this code but showing that subscript out of range

Please Login or Register  to view this content.