28. maj 2009 - 17:15
Der er
7 kommentarer og 2 løsninger
table response.write
hey... nogen der kan lure fidusen ? hvordan får jeg hvert udtræk placeret i de her tables: ved man kan lave dem om til variabler såsom <%billede%> men det er jeg da helt lost i (: <table border="1" bordercolor="" width="" bgcolor=""> <tr> <td rowspan="2">billede</td> <td>tekst</td> </tr> <tr> <td>pris</td> </tr> <% ' Databaseforbindelse - husk at angive sti til din database Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " DSN = DSN & "DBQ=" & Server.MapPath("database.mdb") Conn.Open DSN ' SQL forespørgsel strSQL = "Select * from tabel" ' Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) ' Skriv personens data Response.Write "<img src='billeder/" & RS("billeder") & "' height='50' width='50'>" Response.Write "<dt>" & rs("tekst") & "</dt>" Response.Write "<dt>" & rs("pris") & "</dt>" Conn.Close Set Conn = Nothing %> jeg ved godt tables er forbudt hvis du spørg en garvet, men for mig er det lige det nemmeste (: håber der sidder nogle kloge hoveder...
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
<table border="1" bordercolor="" width="" bgcolor=""> <% ' Databaseforbindelse - husk at angive sti til din database Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " DSN = DSN & "DBQ=" & Server.MapPath("database.mdb") Conn.Open DSN ' SQL forespørgsel strSQL = "Select * from tabel" ' Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) %> <tr> <td rowspan="2"><img src='billeder/"<%=RS("billeder")%>' height='50' width='50'></td> <td><%=RS("tekst")%></td> </tr> <tr> <td><%=RS("pris")%></td> </tr> <% Conn.Close Set Conn = Nothing %> </table>
hey det ser godt ud... den viser bare kun et udtræk... altså hvis jeg har indsat 5 ting i databasen så er det kun det ene den viser...
Slettet bruger
28. maj 2009 - 21:55
#3
Du skal udskrive det i en løkke ala. Set rs = Conn.Execute(strSQL) Do While Not rs.EOF %> <tr> <td rowspan="2"><img src='billeder/"<%=RS("billeder")%>' height='50' width='50'></td> <td><%=RS("tekst")%></td> </tr> <tr> <td><%=RS("pris")%></td> </tr> <% Conn.Close Set Conn = Nothing %> Loop
Slettet bruger
28. maj 2009 - 21:56
#4
Sorry. Glemte rs.MoveNext Det skal ind lige før Loop rs.MoveNext Loop
thomasso det vil ikke rigtig virke.... det siger fejl i RS sætningerne
Slettet bruger
31. maj 2009 - 23:03
#6
Det var også ment som et meget overfladisk eksempel i forlængelse af det der allerede var skrevet. Men du skal konstruere noget i retning af: Set rs = Server.Createobject("ADODB.Recordset") rs.Open "Select bla bla...." Do While Not rs.EOF Response.Write "<tr><td>" Response.Write "Noget indhold " & rs("Feltnavn") Response.Write "</tr></td>" rs.MoveNext Loop rs.Close Set rs = Nothing
så virker det... var ikk så besværligt som jeg havde frygtet... har brugt begge jeres svar så i skal egentlig have point begge 2...
Slettet bruger
05. juni 2009 - 11:27
#8
Ok. Så mangler du bare at tildele point :-)
Kurser inden for grundlæggende programmering