webForumDet fria alternativet

Hjälp med att plocka ur saker ur en databas.

ASP

2 svar · 275 visningar · startad av Coccozz

Medlem sedan apr. 20032 072 inlägg
Frågan#1

Hej!
Behöver hjälp med att plocka ur lite saker ur en databas. Funktionen som jag behöver hjälp med skall plocka ur titel och bild på olika filmer som går under den aktuella veckan. Problemet är att samma film går flera gånger i veckan, men jag vill bara ha bilden och titeln en gång.
Kolla här för att se sidan.
Koden jag använder idag ser ut såhär:

<%
Set Databas = Server.CreateObject( "Adodb.Connection" )
Databas.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath( "/db/bio.mdb" )
Databas.ConnectionString = "Data Source='" & MdbFilePath & "'"
Databas.open

vecka = DatePart("WW", now(),vbMonday,vbFirstFourDays)

strSQL = "SELECT * FROM bio WHERE vecka = " & vecka & ""
Set objRS = Databas.Execute(strSQL)

If ObjRS.EOF then
response.write""
else 
response.write "<table border='0' cellpadding='0' cellspacing='0' style='border-collapse: collapse' width='100%' id='AutoNumber1'>"
response.write "<tr>"
Do Until objRS.EOF

response.write "<td width='*%' align='center'><img border='1px' border-color='#000000' src=" & objRS("bild") & "><br><br>"
response.write "<a href='javascript:popup(""info.asp?titel=" & titel & """,320,200);' class=""bio"">" & objRS("titel") & "</td>"

objRS.MoveNext
	
Loop
Set objRS = Nothing

response.write "</tr>"
response.write "</table>"

END IF  
%>

Tack//

Medlem sedan dec. 20003 563 inlägg
#2
strSQL = "SELECT DISTINCT titel, bild FROM bio WHERE vecka = " & vecka & ""
Medlem sedan apr. 20032 072 inlägg
#3

Mycket bättre :e
Tack för hjälpen//

256 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
123 ms — deklarationer (db)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)
124 ms — ändringar (db)