Välkommen till webForum
dim l,o,p
l = len(s)
o = 1
while l > 30
p = instrrev(mid(s,o,30)," ")
if p = 0 then p = 30
response.write mid(s,o,p) & "<br>"
l = l - p
o = o + p
wend
if l > 0 then response.write mid(s,o)
3 svar · 223 visningar · startad av fundrusse
Tjenna hur går man tillväga så att man kan dela upp info som man läser från databas så att man inte kan skriva en massa tecken på raken..
Det ska bli ett mellanslag typ efter 30 tecken.. Man vill ju inte ha sin gästbok i widescreen =)
Välkommen till webForum
dim l,o,p
l = len(s)
o = 1
while l > 30
p = instrrev(mid(s,o,30)," ")
if p = 0 then p = 30
response.write mid(s,o,p) & "<br>"
l = l - p
o = o + p
wend
if l > 0 then response.write mid(s,o)
Nja jag vettifan asså.. Det ska vara till information om medlemmen oxå.. tänke på replace jux..
vettifan
Går det inte bara att använda left funktionen
=left(rs("sak"),30)
och/eller maximera antal tecken i textrutan??
MVH Jesper