http://cgsweden.mine.nu <-- öppen just nu bara, annars e porten stängd medans jag utvecklar sidan.
Jag har problem med mitt foto galleri. Kanske inte problem men jag vet inte hur jag ska göra en viss sak...
Gå till galleri sidan och klicka på test.
Då får ni fram test galleriet med tre bilder i. All information hämter den fråna databaser *woow* :p aja men det är inte det som är problemet.
Det är att jag inte vet hur jag ska lista placering på just den bilden totalt av alla bilder i databasen.
Plaeringen kommer inte sparas i dbn utan räknas ut på momangen, förutom "högsta placering" funktionen.
Jag vet att den ska göra en mattematisk formel (poäng/röster) vilket ger dig genomsnittspoängen, sedan ska den lista alla i ordning med högsta poängen först e.t.c. Sedan ska den skriva ut placeringen den fick i den uppradade ordningen just till den specfika bilden som visas i loopen.
strSQL = "SELECT visningar, url, (poang / roster) FROM tabell ORDER BY 3 DESC"
Set objRS = objConn.Execute(strSQL)
If NOT objRS.EOF Then
Do Until objRS.EOF
intCount = intCount + 1
Response.Write("Placering: " & intCount)
'Lista ut resten som vanligt....
objRS.MoveNext
Loop
End If
Set objRS = Nothing
Har som sagt ingen aning om det här fungerar, men man kan ju testa i alla fall.
Har inte testat, men det skulle endast fungera om jag listade _alla_ bilder på _samma_ sida. Men om man har lite gallerier här och där kommer den att skriva ut fel placeringar enligt databasen...
Du skulle ju kunna köra den loop som Sebbe föreslår, men bara skriva ut just de poster som uppfyller ett kriterie som du sätter i loopen, typ med en If-sats.
Känns dock inte som om det är rätt väg att gå...
strSQL = "SELECT visningar, url, (poang / roster) , kategori FROM tabell ORDER BY 3 DESC"
Set objRS = objConn.Execute(strSQL)
If NOT objRS.EOF Then
Do Until objRS.EOF
intCount = intCount + 1
If objRS("kategori") = "vad_du_nu_vill_visa" then
Response.Write("Placering: " & intCount)
'Lista ut resten som vanligt....
End If
objRS.MoveNext
Loop
End If
Set objRS = Nothing