11 svar · 293 visningar · startad av icaaq
sitter och knåppar ihop ett länkscript och kommit till skedet där jag ska presentera länkar ur en databas, men nu till frågan, hur gör jag för att presentera länkarna i en tabell med två kolumner??
alltså här är förutsätningarna..
jag har x antal länkar som ska in i varsin cell i en tabell med två kolumner
hoppas ni förstår :e :q
------------------
icaaq
man måste fråga för att lära sig något
---i suck ---
[Redigerat av icaaq den 16 feb 2001]
Detta borde lösa ditt problem:
Connection o recordset skapas här uppe...
Do Until objRecSet.EOF
Response.Write "<tr>" & vbCrLf
Response.Write "<td>" & objRecSet("link") & "</td>"
objRecSet.MoveNext
Response.Write "<td>" & objRecSet("link") & "</td>" & vbCrLf
Response.Write "</tr>" & vbCrLf
objRecSet.MoveNext
Loop
Stäng och rensa upp bland objekten...
------------------
SPiN, bjorne.w@telia.com
--- Är det bara jag som har en britney-cursor? ---
[Redigerat av SPiN den 16 feb 2001]
jag fattar principen men vad är vbCrLf
------------------
icaaq
man måste fråga för att lära sig något
---i suck ---
[Redigerat av icaaq den 16 feb 2001]
Nja, en vbcrlf ger en radbrytning. En <BR> är bara en <BR>.
response.write "hej" & vbcrlf & "hej"
ger
hej
hej
response.write "hej<BR>hej"
ger
hej<BR>hej
..men det var säkert det du menade.
ok testade Spin`s förslag och det funkar ju varannan gång.....
för varannan gång blir det
Exception occurred.
/icaaq-filer/lank.asp, line 197
det lär väl vara för att det blir EOF mitt i en cell jag har förökt att göra så här men inte lyckats
Do Until rs.EOF
Response.Write "<table width=""100%"" border=""0"" cellspacing=""3"" cellpadding=""0"">" & vbCrLf
Response.Write "<tr>" & vbCrLf
Response.Write "<td>" & "<font size=""1"">" & rs("link") & "</td>"
rs.MoveNext
If rs.EOF Then
Response.Write "<td>" & "<font size=""1"">" & "nbsp;" & "</td>" & vbCrLf
Response.Write "</tr>" & vbCrLf
End If
Response.Write "<td>" & "<font size=""1"">" & rs("link") & "</td>" & vbCrLf
Response.Write "</tr>" & vbCrLf
rs.MoveNext
Loop
vad kan jag göra....
------------------
icaaq
man måste fråga för att lära sig något
---i suck ---
[Redigerat av icaaq den 19 feb 2001]
det fixade sig ......glömde en
Exit Do
------------------
icaaq
man måste fråga för att lära sig något
---i suck ---
Lite snabbt av huvet så det kan vara fel ;)
Sub DisplayLink()
If NOT rs.EOF Then
Response.Write "<td>" & "<font size=""1"">" & rs("link") & "</td>"
Else
Response.Write "<td>" & "<font size=""1"">" & "nbsp;" & "</td>" & vbCrLf
End If
rs.MoveNext
End Sub
If NOT rs.EOF Then
Response.Write "<table width=""100%"" border=""0"" cellspacing=""3"" cellpadding=""0"">" & vbCrLf
Do Until rs.EOF
Response.Write "<tr>" & vbCrLf
DisplayLink
DisplayLink
Response.Write "</tr>" & vbCrLf
Loop
Response.Write "</table>" & vbCrLf
End If
------------------
MvH
/Bengan
www.bengan.com | Brossans Räjser
"Better to be hated for who you are than loved for who you're not."
Bah!
Då skrev jag allt det i onödan! :e
------------------
MvH
/Bengan
www.bengan.com | Brossans Räjser
"Better to be hated for who you are than loved for who you're not."
det är lungt ......kommer med mer frågor snart.... :e
------------------
icaaq
man måste fråga för att lära sig något
---i suck ---
Fortsätter lite på den här tråden med följande undring.
Om man vill ha in en bild på samma sätt, hur skriver man då?
<img src="images/<%=rs("imageName")%>.jpg" width="150" height="100" border="0" alt="">
<input type=radio name="pic" value=<%=rs("id")%>