webForumDet fria alternativet

Visa poster från olika tabeller?

ASP

1 svar · 159 visningar · startad av magnus_n

Medlem sedan maj 200317 inlägg
Frågan#1

charkprodukter.asp består av ram1 (chark.asp), en sida som listar produkterna från databasen och ram2 (produktsvar.asp) där information om produkten spaltas upp.

chark.asp (kod):

<%Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "DBQ=" & Server.MapPath("admin/jm.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM Produkt ORDER BY Namn"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>

<%Do Until RecSet.EOF %>

<a href="produktsvar.asp?id=<%=RecSet("ProduktID")%>" target="svar"><%=RecSet("Namn") %></a><br>

<% RecSet.MoveNext
Loop
RecSet.Close %>

Denna kod fungerar bra och produkterna listas från db:n.

produktsvar.asp (kod):

<%Set Connect = Server.CreateObject("ADODB.Connection")Connect.Open "DBQ=" & Server.MapPath("admin/jm.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

Set RecSet = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT Namn, Bild, Kottmangd FROM Produkt, Kottmangd WHERE ProduktID = " & Request.Querystring("id")

Set RecSet = Connect.Execute (strSQL)%>

<ul>
<li><b><% =RecSet("Namn") %></b><br>
<br>
<img src="<% =RecSet("Bild") %>"<br>
<br>
<b>Köttmängd: </b><% =RecSet("Kottmangd") %>

Namn och bild som hämtas från orodukt-tabellen visas rätt när man klickar på produkt-länken i ram1 (chark.asp) men köttmängden som hämtas från tabellen Kottmangd blir densamma för alla produkter även om de har olika värden i db:n. Någon som kan svara på varför det blir så?

Medlem sedan sep. 20026 425 inlägg
#2

Använd kod-taggen, till att börja med. Vänta..

<%Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "DBQ=" & Server.MapPath("admin/jm.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" 

Set RecSet = Server.CreateObject("ADODB.Recordset") 
Visa = "SELECT * FROM Produkt ORDER BY Namn" 
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %> 

<%Do Until RecSet.EOF %> 

<a href="produktsvar.asp?id=<%=RecSet("ProduktID")%>" target="svar"><%=RecSet("Namn") %></a><br> 

<% RecSet.MoveNext 
Loop 
RecSet.Close %> 

Denna kod fungerar bra och produkterna listas från db:n. 

produktsvar.asp (kod): 

<%Set Connect = Server.CreateObject("ADODB.Connection")Connect.Open "DBQ=" & Server.MapPath("admin/jm.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" 

Set RecSet = Server.CreateObject("ADODB.Recordset") 
strSQL = "SELECT Namn, Bild, Kottmangd FROM Produkt, Kottmangd WHERE ProduktID = " & Request.Querystring("id") 

Set RecSet = Connect.Execute (strSQL)%> 

<ul> 
<li><b><% =RecSet("Namn") %></b><br> 
<br> 
<img src="<% =RecSet("Bild") %>"<br> 
<br> 
<b>Köttmängd: </b><% =RecSet("Kottmangd") %>
261 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
126 ms — deklarationer (db)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)
123 ms — ändringar (db)