Kan ikke genbruge RS kald, ASP
Hejsa NGMed følgende kode:
strSQL = "Select * From gallery ORDER BY titel"
Set rs = Conn.Execute(strSQL)
Do
if rs.EOF then
Response.write "Ingen billeder i databasen."
else
colPrRow = 4
colInRow = 0
response.write "<table width=""450"" border=""0"">"
do while NOT RS.EOF
if colInRow = 0 then response.write "<tr>"
response.write "<td><a href='/gallery/" & rs("mappe") & "/" & rs("pic") & "' target='_new'><img src='/gallery/" & rs("mappe") & "/" & rs("thumb") & "' border='0'></a></td>"
colInRow = colInRow + 1
if colInRow >= colPrRow then
colInRow = 0
response.write "</tr>"
end if
RS.MoveNext
loop
if colInRow > 0 then
Response.Write "</tr>"
end if
response.write "</table>"
end if
Loop While Not rs.EOF
conn.Close
Set Conn = Nothing
Hvorfor må jeg ikke kalde et RS to gange?
Dvs. det kan jeg godt uden fejl, men den viser kun rs("mappe") første gang. (Én gang)
Any suggestions?
