Uppdatera

:e 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