28. februar 2001 - 23:01Der er
8 kommentarer og 1 løsning
aspmenu og .asp?id=xxx
Jeg vil lave 2 sider i asp. side 1 med en menu, side 2 med visning af indhold for valgte menu på side 1..hvordan gør jeg ..jeg kan ikke få dette til at virke :
foerste.asp : <html> <head> <title>Første side i asp-experiment</title> </head> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\"& Server.MapPath (\"database.mdb\") strSQL = \"Select * From Tcontent\" Set RS = Conn.Execute(strSQL)
id = 10 <a href="Anden.asp?id=<%=RS("CAT\")%>\">Noget1</a> id = 20 <a href="Anden.asp?id=<%=RS=("CAT")%>\">Noget2</a> rs.Close Set rs = Nothing %>
Anden.asp :
<html> <head> <title>Anden side i asp-experiment</title> </head> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"database.mdb\") strSQL = \"Select * from Tcontent where Id = \" & Request.QueryString(\"Id\") Set RS = Conn.Execute(strSQL)
response.write RS("Beskrivelse")
rs.MoveNext Loop rs.Close Set rs = Nothing %> </body> </html>
Teknologi, AI og forretning er i centrum på Computerworlds Cloud og AI Festival i København d. 18. og 19. september. Se hele programmet for den store konference om strategisk brug af Cloud og AI på: www.cloud-festival.dk
nu er det \"pinnet\" ned til en fejl som går ud på at den ikke overfører \"id\" rigtigt.. hvis jeg manuelt tilføjer to små \' så´en her : http://www.capion.dk/db/anden.asp?id=\'18\' Får jeg det jeg søger..men ligemeget hvad jeg prøver kan jeg ikke få den til at overføre andet end : http://www.capion.dk/db/anden.asp?id=18 Hvad går det ud på ?
Nå men tak for hintet.. det kom til at se så´en ud og det virker *S* :
Foerste.asp : \' kode1 start <% id = 18 \'menupkt hardcodes med id Response.Write(\"<a href=\'anden.asp?id=\" & id & \"\'>some \" & id & \"</a><br>\") \' Menupkt vises som link, id hægtes på
id = 20 Response.Write(\"<a href=\'anden.asp?id=\" & id & \"\'>some \" & id & \"</a><br>\") %> \' kode1 slut
anden.asp : \' kode2 start
<% \' database forbindelse forberedes og åbnes Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"portal.mdb\") \' data fra tabel hvor \"hits\" = id fra foerste.asp udvælges og åbnes strSQL = \"Select * from banner where kat =\" & Request.QueryString(\"id\") Set RS = Conn.Execute(strSQL)
\' Lav list med resultater Do While NOT RS.EOF Response.Write \"<a href=http://\" & rs(\"Url\") & \"><img src=\'\" & rs(\"Filename\") & \"\' border=0></a><br><br>\" rs.MoveNext Loop
\' Luk pænt efter dig rs.Close Set rs = Nothing %>
\' Kode2 slut
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.