Hvordan sletter man en post i en 1 til M relation?
Jeg har blandt mange ting prøvet med følgende:<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("Emnekasser3.mdb")
SQL = "SELECT Indhold.IndholdID, Indhold.KalalogRef, Indhold.Antal, Indhold.Materiale, Indhold.MaterialeType, Indhold.Pris FROM Indhold UNION SELECT Kassen.KatalognrID, Kassen.Emnenavn, Kassen.EmneDC, Kassen.Undertitel, Kassen.KlassetrinRef, Kassen.AfdRef, Afdeling.Afd_ID, Afdeling.Afdeling, Klassetrin.Klassetrin_ID, Klassetrin.Klassetrin FROM Kassen, Afdeling, Klassetrin WHERE Indhold.IndholdID=KatalognrID AND Klassetrin.Klassetrin_ID=Kassen.KlassetrinRef AND Afdeling.Afd_ID=Kassen.AfdRef AND Kassen.KatalognrID = '" & Request("liste") & "'"
Set Resultat = Server.CreateObject("ADODB.Recordset")
Resultat.Open SQL, Connect, adOpenStatic, adLockPessimistic
Resultat.delete
%>
Det giver følgende fejlmeddelelse:
Antallet af kolonner i de to markerede tabeller eller forespørgsler i en foreningsforespørgsel stemmer ikke overens.
Jeg er nu nået dertil, at jeg så først skal slette poster i den svage tabel(= Indhold) og dernæst den stærke tabel(= Kassen)
Mine forsøg på at gøre ender ved første - Resultat.Open...
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("Emne3.mdb")
Set Resultat = Server.CreateObject("ADODB.Recordset")
SQL = " DELETE * FROM Indhold WHERE Indhold.KatalognrRef = '" & Request("liste") & "'"
Resultat.Open SQL, Connect, adOpenStatic, adLockPessimistic
SQL = " DELETE * FROM Kassen WHERE Kassen.KatalognrID = " '& Request("liste") & "'"
Resultat.Open SQL, Connect, adOpenStatic, adLockPessimistic
%>
Giver denne fejlmeddelelse: Der er for få parametre. Der var ventet 1.
Håber I kan hjælpe.
