JAg fortsätter med min CD-databas.
Vill åxå kunna deleta CD.
Så här försöker jag:

<code>
Dim db As DAO.Database
Dim QDef As DAO.QueryDef
Dim rs As DAO.Recordset
Set db = CurrentDb

MSG = "Är du säker på att du vill ta bort CD:n " & Me!Titel & "?" & vbCrLf
If MsgBox(MSG, vbInformation + vbYesNo, "Ta bortCD?") = vbYes Then

SQL = "Delete FROM [T-Sångtitlar] WHERE CDID=" & Me!CDID & ""
db.Execute (SQL)
SQL = "Delete FROM [T-CDTitlar] WHERE CDID=" & Me!CDID & ""
db.Execute (SQL)
Else
MsgBox "Ingenting har hänt för " & Me!Titel
End If
</code>
Problem, egenteligen inte, men måste jag köra två SQL?
Jag har åxå försökt att stega ett steg tillbaka, så att jag får formuläret uppdaterat, men jag misslyckas med rs.MovePreviues(tror jag det stavas)
Vad tror ni?

Skapa en relation med referensintegritet och ange att det skall ske cascade delet. Då kommer det räcka med att ta bort poster i [T-CDTitlar] tabellen. Posterna som uppfyller relationen med den borttagna posten kommer att tas bort i [T-Sångtitlar].

Försök istället attt köra Requery på formuläret.

Requery har jag aldrig använt mig av.
Hur vill du föreslå att jag skall använda det?

JAg antar att du utvecklar applikationen i Access och inte VB. Då skriver du Me.Requery i formuläret. Eller Forms("Form1").Requery

Du kan använda rs.Reequery

Tänk på att frågan ställs om till databasen och du kommer då befinna dig på första posten.

Tack.
Nu blev det helt enkelt kanonbra.