Länkar och RegExp

ASP

2 svar · 861 visningar · startad av Andy

Medlem sedan sep. 2001138 inlägg
Trådstart#1

Har en liten VBScript-funktion som konverterar URL:er till klickbara länkar i mitt forum med hjälp av forum. Så långt allt väl.

Men vad jag vill göra är att korta ner alldeles för långa länkar, så att dom inte förstör sidans layout. Jag vill alltså att själva länktexten till exempel skall bli http://www.blabla.com/...nk.htm om originallänken ser ut så här: http://www.blablabla.com/jättelånglänk.htm

Hur gör jag detta?

Medlem sedan feb. 200563 inlägg
#2

Re: Länkar och RegExp

Så här kan du göra:

Set objRegExp = New regexp
sURL = "http://www.blablabla.com/jättelånglänk.htm"
objRegExp.Pattern = "(.{25})(.{4,})(.{6})"
sText = objRegExp.Replace(sURL, "$1...$3")
'Resultat: sText = "http://www.blablabla.com/...nk.htm"

/ Tomas

Medlem sedan maj 200010 687 inlägg
263 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
122 ms — deklarationer (db)
0 ms — hämta statistik (cache)
133 ms — hämta tråd, inlägg och bilagor (db)
127 ms — ändringar (db)