Hej ! Något att leka med.Loop
Jag har ett litet problem. Jag ska göra en loop som breder ut sig på tre kolumner och sedan loopa neråt.
Har gjort så här.
Do until agent.EOF
Response.write"<tr>"
For i=0 To agent.fields.Count -1
Response.write"<td>" & agent.fields(i) & "<td>"
next
Response.write"</tr>"
agent.MoveNext
loop
Men det fungerar inte så bra. Mitt i alltihopa ska jag ha en länk på en bild. Någon som vill vara snäll och hjälpa mig.
/MiaSv: Loop
/Janne
Response.Write "<table border=1>"
Do Until tblTemp.EOF
Response.Write "<tr>"
For i = 1 To 3
If Not tblTemp.EOF Then
Response.Write "<td>" & tblTemp("FNamn") & "</td>"
tblTemp.MoveNext
Else
Response.Write "<td>Empty</td>"
End If
Next
Response.Write "</tr>"
Loop
Response.Write "</table>"