Undersøge relateret tabel
Hej EksperterJeg er kommet på for dybt vand, og har brug for hjælp.
Jeg er ved at lave et nyhedsscript, hvor man kan vælge hvilke kategorier som siden skal vise.
Kategorierne bliver listet frem fra en tabel [News_Category].
Ud for hver kategori er der en checkboks (afkrydsningsfelt), hvor man kan bestemme om kategorien skal vises eller ej.
De felter som er krydset af bliver oprettet i en anden tabel [News_Cat_Config], ved hjælp af dette script:
------------------------------------------------------------------
Config_Id = rs_config_news.Fields("Id")
'Undersøger hvilke kategorier som er tilknyttet afsnittet
Set rs_news_cat_config = Server.CreateObject("ADODB.RecordSet")
rs_news_cat_config.open "Select * From [News_Cat_Config]" , Conn,1, 3
'Henter kategorierne
Set rs_get_cat = Server.CreateObject("ADODB.RecordSet")
rs_get_cat.open "Select * From [News_Category] Where Active = 1 AND Site_Id = " & Site_Id , Conn
Do while not rs_get_cat.EOF
cat_id = rs_get_cat("id")
If Request.Form(""&cat_id) = "ok" Then
rs_news_cat_config.Addnew
rs_news_cat_config("News_Cat_Id") = cat_id
rs_news_cat_config("News_Config_Id") = Config_Id
rs_news_cat_config.Update
End If
rs_get_cat.MoveNext
Loop
rs_get_cat.Close
rs_news_cat_config.Close
rs_config_news.Close
------------------------------------------------------------------
Det virker fint når man opretter selve nyhedssiden.
Mit problem kommer når man skal redigerer siden igen.
Der skal et script undersøge, på samme måde som nu, og feltet er krydset af. Er det krydset af skal det oprettes i tabellen [News_Cat_Config], MEN kun hvis posten ikke allerede eksisterer.
På samme måde hvis et felt IKKE er krydset af, skal scriptet undersøge om posten eksisterer i tabellen. Gør den det skal den slettes!
Er det til at forstå??
Jeg håber virkelig der er en der har lyst til at hjælpe mig...
// Bruhn
