Set RS = ("UPDATE LagerSaldo SET Lagersaldo=""" & LSaldo & """ WHERE ArtikelNr= " & Lw1.TextMatrix(C, 2) & "'")
Det blå markerade (sista) & teckent får "Type mismatch" Varför??
Är det nån som har en idé?
Tack på förhand.
SQL sträng med ADODB
2 svar · 289 visningar · startad av Thure
Set RS = ("UPDATE LagerSaldo SET Lagersaldo=" & LSaldo & " WHERE ArtikelNr= '" & Lw1.TextMatrix(C, 2) & "'")
Är inte lagersaldo numeriskt? Är artikelnummer numeriskt? Ta i så fall bort apostroferna runt.
Det räcker ofta att räkna citationstecken / apostrofer och kontrollera dess placering.
Dessutom, ser jag nu i efterhand när jag läser lite närmre, så har du blandat ihop lite i VB. Först ska du skapa SQL-frågan i en sträng, sedan exekvera den.
strSQL = "UPDATE LagerSaldo SET Lagersaldo=" & LSaldo & " WHERE ArtikelNr= '" & Lw1.TextMatrix(C, 2) & "'"
Set RS = [i]connectionobjekt[/i].Execute (strSQL)