strSQL = "Update tblMaterial set Amount = Amount + " & iQuantity & " Where ArtNr = '" & sEnumber & "'"
Trådstart#1
Hej!
Jag har följande kod som uppdaterar eller gör en insert beroende på om artiukeln finns i tabellen.
'Först kör vi en UPDATE om artikeln redan finns
strSQL = "Update tblMaterial set Amount = " & iQuantity & " Where ArtNr = '" & sEnumber & "'"
objConn.Execute strSQL, lngRA, 128
if lngRa = 0 then
'Ny artikel, INSERT
strSQL = "INSERT INTO tblMaterial (Id, Modified, taskId, ArtNr, ArtName, Amount, Unit, Price, [Note]) " &_
"VALUES (" & iNextId & ", Now(), " & iTaskId & ", '" & sEnumber & "', '" & sArticleName & "', " &_
"" & iQuantity & ", '" & sUnit & "', " & iPrice & ", '" & sNote & "')"
objConn.Execute strSQL,,128
End If
Det funkar ju fint men den tar ju inte hänsyn till vad som står i tblMaterial. Tanken är ju att om det ffinns 2 artiklar i tblMaterial och fyra läggs till ska det bli 6. Nu blir det fyra. (vilket jag förstår eftersom jag skrivit koden så)
Men hur gör man för att lägga till de nya artiklarna samtidigt som de gamla behålls?
Mvh
Henrik
