Jag springer på problem efter problem i mitt bygge av bildgalleri...
Jag har en sida där jag loopar ut kategorier med SQL kommandot distinct. Min kod ser ut som följer:
SQL = "Select distinct kategori From upload Order By kategori ASC"
Nu vill jag kunna länka vidare varje post som loopas ut i "kategori" till en sida som visar alla bilder i den valda kategorin men vet inte hur jag ska göra.
Om det är någon som har en smart lösning på detta vore jag hemskt tacksam!
Förstrå inte riktigt, du vill skapa en länk med kategorin i?
SQL = "Select distinct kategori From upload Order By kategori ASC"
Set objRs = objCon.Execute(SQL)
If Not objRs.EOF Then
Response.Write "<a href=""visa.asp?kategori=" & objRs("kategori") & """>" & objRs("kategori") & "</a><br>"
Else
Response.Write "Det finns inga kategorier i databasen"
End If
objRs.Close: Set objRs = Nothing
Sen på visa.asp hämtar du bliderna med t.ex:
sCat = Request.Querystring("kategori")
SQL = "Select bild From upload Where kategori = '" & Replace(sCat, "'", "''") & "'"
Har redan testat det och får till följd att jag får en länk som ser ut som denna: "visa.asp?kategori="
Den fyller inte kategorin i länken. Vet dock inte vad det beror på om det har att göra med att kategorierna i fråga innehåller blanksteg. Men det tror jag inte.
Det har ingen betydelse om man använder Objrs(0) eller objRs("kategorier")
Om den första kategorin är null eller bara innehåller blanka så blir det så. Det saknas även en loop för att skriva ut alla kategorier
SQL = "Select distinct kategori From upload Order By kategori ASC"
Set objRs = objCon.Execute(SQL)
If objRs.EOF Then
Response.Write "Det finns inga kategorier i databasen"
else
while not ObjRs.eof
if "" & ObjRs("Kategori") = "" then
Response.Write "<a href=""visa.asp?kategori=" & objRs("kategori") & """> Okänd kategori </a><br>"
else
Response.Write "<a href=""visa.asp?kategori=" & objRs("kategori") & """>" & ObjRs("kategori") & "</a><br>"
End If
ObjRs.movenext
wend
objRs.Close: Set objRs = Nothing
Sen på sidan där du visar bilderna får du hantera de som inte är kategoriserade.
if request.querystring("kategori") = "" then
sql = "select <kolumner> from bilder where kategori is null or kategori = ''"
else
sql = "select <kolumner> from bilder where kategori = '" & request.querystring("kategori") & "'"
