Excel VBA INSERT INTO SQL - Dato problem
HejJeg har en tabel, som skal skrives til en sql db. Jeg har prøvet alle mulige og umulige måde, søgt på nettet og nu er jeg ved at hive de sidste tre hår ud af hoved - håber derfor at en kan hjælpe.
Jeg får alle mulige forskellige fejl bla. "conversion failed when converting date and/or time to string".
I en løkke skriver jeg invoice date til en variable
dInvoiceDate = sh1.Cells(i, 8)
Som jeg prøver at indsætte i sql-db. Det lykkes ind i mellem, men ikke hver gang.
SQL = "INSERT INTO " & sTable & " (" & _
"BU, Sub_BU, Country, OrderNumber, " & _
"Customer, InvoiceDate, FiscalMonth, FiscalYear, " & _
"CaMonth, CaYear, Value_StdEuro, LedgerAccount, " & _
"FirstYearMaintenance, calcLedger, FYQuarter, " & _
"FYMonth, YearMonth, SplitMoved, " & _
"Notes)" & _
"VALUES (" & _
" '" & sBU & "', '" & sSub_BU & "', '" & sCountry & "', " & _
Str(dOrderNumber) & ", '" & sCustomer & "', '" & dInvoiceDate & "', " & _
iFiscalMonth & ", " & iFiscalYear & ", " & iCaMonth & ", " & _
iCaYear & ", " & Str(dValue_StdEuro) & ", '" & sLedgerAccount & "', " & _
iFirstYearMaintenance & ", '" & scalcLedger & "', '" & sFYQuarter & "', " & _
"'" & sFYMonth & "', '" & sYearMonth & "', '" & sSplitMoved & "', " & _
"' " & sNotes & "')"
CN.Execute (SQL)
På forhånd tak.