Max 5 liner!

altså tabellen har en bestemt størrelse (fx 200 * 100 px) og teksten må ikke fylde mere end der kan være i tabellen. altså skal den trimme teksten, så den passer deri. plus at der skal være ... efter den trimmede tekst!

tjaa...

<%
strNews = (RecNews.Fields.Item("news_text").Value)
strNews2 = split(strNews, VbCrLf)
strNews = ""
for i = 1 to 5
strNews = strNews&VbCrLf&strNews2(i-1)
next
%>


prøv det engang :) burde virke

Der bliver vel et problem, hvis en linie er længere end 200 pix.

hej.. jeg tester det først lige i morgen, da min webhotel-udbyder's server er gået ned, så jeg kan ikke få adgang med ftp'en.. men kigger på det i morgen :-)

Så kører mit webhotel igen..

jeg har prøvet med følgende kode, men den giver en fejl..

---------------------

<%
strNews1 = (RecNews1.Fields.Item("news_text").Value)
strNews1_2 = split(strNews1, VbCrLf)
strNews1 = ""
for i = 1 to 3
strNews1 = strNews1&VbCrLf&strNews1_2(i-1)
%>

          <td width="220" height="90" valign="top"><p class="tekst"><a href="#"><%=(strNews1)%>...</a></p></td>

<%
next
%>

-------------------------

FEJLEN:

Microsoft VBScript runtime error '800a0009'
Subscript out of range: '[number: 1]'

/index_dk2.asp, line 189

---------------------

Linie 189:

strNews1 = strNews1&VbCrLf&strNews1_2(i-1)

lukker