webForumDet fria alternativet

länka i en databas

ASP

10 svar · 364 visningar · startad av Dwarfen

Medlem sedan jan. 2002241 inlägg
Frågan#1

Jag behöver lite hjälp länkar i asp

har använta mig av :
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=d:\damp\alternativ\databaser\filmer.mdb" & Server.MapPath("databas.mdb")
Set rs = Connection.Execute("SELECT TOP 5 ID, TITEL FROM FILMER ORDER BY ID ASC")
%>
<%
Do Until rs.EOF
Response.Write"<a href=filmer.asp?ID="& rs("ID") & ">" & rs("TITEL") & "</a><BR>"
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
Connection.Close
Set Connection = Nothing
%>

det gör så att jag kan se min post, och den funkar som länk,
men när jag klickar på den kommer jag till filmer.asp?id=X

undrar om hur man skriver för att gör så man kommer direkt till den post man klickat på.

Jag har alltså mer poster som ska vissas...någon som förstår vad jag menar och hur man gör?

Tacksam för svar
/Dwarfen

Medlem sedan mars 20015 287 inlägg
#2

Eh? Jag fattar i alla fall inte....

Medlem sedan dec. 200012 464 inlägg
#3

Något oklar vad du menar, men om du vill hämta en film med ett visst ID så kan du skriva så här.

Set rs = Connection.Execute("SELECT * FROM FILMER where id = " & request.querystring("id"))
Medlem sedan jan. 2002241 inlägg
#4

jo...jag menade...
Jag ska lista titlarna på filmerna på en sidan...i en tabel...De ska vara klickbara (länkar).
Med hjälp av länkarna ska man komma till en ny sida, där resten av posterna från den filmens databas ligger..

Undrar alltså hur man gör från länkningen till en ny sida...
Klarare nu?

Medlem sedan mars 20015 287 inlägg
#5

Det är ju bara att göra i princip som du gör nu, med undantag för sqlsatsen.

typ:

<% 
Set Connection = Server.CreateObject("ADODB.Connection") 
Connection.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=d:\damp\alternativ\databaser\filmer.mdb" & Server.MapPath("databas.mdb") 
Set rs = Connection.Execute("SELECT * FROM FILMER where id = " & request.querystring("id")) 

Do Until rs.EOF 
Response.Write "ID="& rs("ID") & "<BR>"
Response.Write " & rs("TITEL") & "<BR>"
'resten av de fält du vil skriva ut.
rs.MoveNext 
Loop 
rs.Close 
Set rs = Nothing 
Connection.Close 
Set Connection = Nothing 
%>

Btw. hur kommer det sig att tomtarna inte kan se? ;)

Medlem sedan jan. 2002241 inlägg
#6

Re: Btw...
Långt hår, mössor nere över ögona...och mycket julöl ;)

/tackar så mycekt för hjälpen

Medlem sedan jan. 2002241 inlägg
#7

hmm...det funka inte...du råkar inte ha ett annat alternativ till lösning, skulle bli mycket glad.

Medlem sedan nov. 20017 144 inlägg
#8

Jag skulle bli förvånad om administratörerna på detta forum skulle acceptera din "underline" ;) .

MVH Jesper T

Medlem sedan juni 200032 967 inlägg
#9

Det är korrekt.

Dwarfen, vänligen ändra din signatur.

Mvh,
@nders
Forumledare

Medlem sedan jan. 2002241 inlägg
#10

ser det bättre ut nu då?

Medlem sedan maj 20002 597 inlägg
#11

Eftersom folk redan sett din signatur så fattar dom syftet med "######" så varför inte byta signatur helt?

260 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
130 ms — deklarationer (db)
0 ms — hämta statistik (cache)
127 ms — hämta tråd, inlägg och bilagor (db)
124 ms — ändringar (db)