webForumDet fria alternativet

Radbrytningar, tack!

ASPur ASP

8 svar · 186 visningar · startad av Fredriksson

FredrikssonMedlem sedan nov. 2000319 inlägg
#1

Den här frågan har säkert varit uppe innan men hur gör man för att när man skriver ut en textsträng radbryta alla ord som är mer än X tecken långa efter X tecken???

------------------
F R E D R I K S S O N

SPiNMedlem sedan mars 20007 896 inlägg
#2

Användbara funktioner i http://script.webforum.nu

------------------
SPiN, bjorne.w@telia.com

-- Fame is a bitch, man [Brad Pitt - Fight Club] --

FredrikssonMedlem sedan nov. 2000319 inlägg
#3

Det finns dock ett problem med din funktion. Om ett ord t.ex. består av 300 tecken så kommer det radbrytas efter de 50 första med inte mer. Ordet ska ju "delas upp" i ord som inte är längre än 50 tecken.

------------------
F R E D R I K S S O N

FredrikssonMedlem sedan nov. 2000319 inlägg
#4

SPiN :q

------------------
F R E D R I K S S O N

SPiNMedlem sedan mars 20007 896 inlägg
#5

Japp, jag vet.. Har inte kommit på något sätt att lösa det på, och ingen annan heller verkar det som. Trist, men sant...

------------------
SPiN, bjorne.w@telia.com

-- Fame is a bitch, man [Brad Pitt - Fight Club] --

VideMedlem sedan dec. 19998 577 inlägg
#6

Det är nog enklast att göra detta mha RegExp: http://www.webavis.nu/webavis/html/artiklar/asp/asp11.shtml

------------------
Budweiser - Slightly contaminated water... probably harmless, but I would recommend boiling before you drink it...
webEye.nu SweQuake.com

FredrikssonMedlem sedan nov. 2000319 inlägg
#7

Nån som har lust att bidra med ett exempel?

------------------
F R E D R I K S S O N

JohnsenMedlem sedan juli 2000836 inlägg
#8

Kan man inte loopa lite, eller finns det begränsningar med det?

Strang="första aaaaaaaaaabbbbbbbbbbccccccccccddddddddddeeeeeeeeee tredje"
theArr= Split(strang, " ")
maxLangd= 30

i=0
 while i<= uBound(theArr)
  If len(theArr(i)) > maxLangd then
j=0
 while j<(len(theArr(i))/maxLangd)
  splittOrd=splittOrd & mid(theArr(i),(1+j*maxLangd),maxLangd) &" "
   j=j+1
  wend
theArr(i)=splittOrd
End If
nyStrang=nystrang & theArr(i) &" "
  i=i+1
 wend

Response.write nyStrang

------------------
- J-O-H-N-S-E-N -
------------------

FredrikssonMedlem sedan nov. 2000319 inlägg
#9

Du är bäst, Johnsen!

Tackar!!! :)

------------------
F R E D R I K S S O N

130 ms totalt · 3 externa anrop · v20260731065814-full.29ac60f6
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
127 ms — hämta tråd, inlägg och bilagor (db)