PeppeMedlem sedan sep. 200544 inlägg Går det att sätta maxlength på en vanlig text, vill ha det så att det typ kommer 3 st punkter efter inledningen på en text, Ex:
Det var en gå...
Det går ju att plocka ut 5 poster i en tabell, men är det samma princip här ?
Skriv gärna koden för hur man gör.
Jag skall plocka text ur en databas
Ha d gött !
emissionMedlem sedan dec. 19996 721 inlägg rubrik="Det var en gång"
response.write left(rubrik,13) & "..."
Om du vill att Ex antal ord skall visas först kan du använda dig av en funktion:
function intro(text,tal) 'Skapar funktionen intro()
myarr = split(text, " ")
i = 0
for i = lbound(myarr) to ubound(myarr)
select case i
case tal-1
response.write(myarr(i) & " ...")
exit for
case else
response.write(myarr(i) & " ")
end select
next
end function
response.write intro(databas Text,6)
PeppeMedlem sedan sep. 200544 inlägg Tack för svaren, mitt problem är nu löst !
Select Case kan vara användbart, men man behöver inte överdriva användandet.
Select Case bör inte ersätta If-satser.
If i = tal-1 Then
Response.Write myarr(i) & " ..."
Exit For
Else
Response.Write myarr(i) & " "
End If