Vælg random poster i en Access db
Hey!Ikke verdens skarpeste ASP frækkert her... Men...
Jeg har scriptet et fotoalbum! Så vil jeg gerne have, at den på forsiden henter et album menus overskrift og parentid overskriften og derefter lister 3 random billeder nedenunder. Det skal den så gøre med alle de albums der ligger der.
Albums defineres ved at de ligger i tabellen "menu" og har et menuID på 3 cifre. Fx 400.
Min databaseopbygning ser således ud:
[Billeder]
id = autonummerering (billedets id)
albumID = fx 400 eller 401
filNavn = billedets navn
[Menu]
menuID = child (altså menuens eget ID)
id = parent (altså den menu som den hører under)
menuNavn = menuens navn
Det jeg så har prøvet er følgende:
SQL_album = "SELECT m.menuNavn, m.menuID, m.id FROM Menu m, Billeder b WHERE m.menuID = b.albumID GROUP BY m.menuNavn, m.menuID, m.id"
set RS_album = conn.execute(SQL_album)
SQL_rnd = "SELECT TOP 3 filNavn FROM Billeder WHERE albumID = " & RS_album("menuID") & " ORDER BY rnd()"
set RS_rnd = conn.execute(SQL_rnd)
Hvor den jeg nok skal editere i er SQL_rnd
Mit ASP ser således ud:
do while not RS_album.eof
if NOT blnFirst = true then response.write "<hr />"
response.Write "<p><a href=""?id=" & strID & "&sub=" & RS_album("menuID") & """>" & VbCrLF &_
RS_album("menuNavn") & " - " & RS_albumNavn("menuNavn") & "<br />" & VbCrLf &_
"<img class=""imgBorder"" src=""billeder/festival_imgs/" & RS_album("menuID") & "/pics/thumbs/" & RS_rnd("filNavn") & """ />" & VbCrLf &_
"<img class=""imgBorder"" src=""billeder/festival_imgs/" & RS_album("menuID") & "/pics/thumbs/" & RS_rnd("filNavn") & """ />" & VbCrLf &_
"<img class=""imgBorder"" src=""billeder/festival_imgs/" & RS_album("menuID") & "/pics/thumbs/" & RS_rnd("filNavn") & """ />" & VbCrLf &_
"</a></p>" & VbCrLf
blnFirst = false
RS_album.movenext
loop
Jeg vil virkelig gerne se noget komplet eksempel - for jeg er ikke så sej til at oversætte pseudokode til virkelighed :)
