13 svar · 373 visningar · startad av bassebhu
Hej!
Har en liten kul funktion. Den ersätter [link]namn[/link] med <a href="medlemmar_info.asp?vem=namn">namn</a>
nu är det bara ett problem. när man skriver flera olika namn strular det. allts t ex.
[link]namn[/link]
[link]namn2[/link]
blir:
<a href="medlemmar_info.asp?vem=namn">namn</a>
<a href="medlemmar_info.asp?vem=namn2">namn</a>
Jag vill att det ska bli:
<a href="medlemmar_info.asp?vem=namn">namn</a>
<a href="medlemmar_info.asp?vem=namn2">namn2</a>
Kommer ikke på hur jag ska lösa det som =/
<%
function link(strL)
str= strL
middas1 = instr(strL,"[link]")
middas2 = middas1 + 6
strL = Mid(strL,middas2)
middas1 = instr(strL, "[/link]")
middas2 = middas1 - 1
If middas1 > 1 Then
strL = Left(strL, middas2)
End if
str = Replace(str, "[link]","<a href=" & chr(34) & "medlemmar_info.asp?vem=")
str = Replace(str, "[/link]", chr(34) & ">" & strL &"</a>")
link = trim(str)
end function
%>
HJÄLP! =) tack
mvh: basse
Du får nog skriva lite regexp för att lösa detta.
dim o,str
set o = new regexp
o.pattern = "\[link\](.*?)\[/link\]"
o.global = true
o.ignorecase = true
str = "[link]namn[/link] [link]namn2[/link] "
response.write o.replace(str,"<a href=""medlemmar_info.asp?vem=$1"">$1</a> ")
hela functionen....
alltså hela link mot
function link(str)
dim o
set o = new regexp
o.pattern = "\[link\](.*?)\[/link\]"
o.global = true
o.ignorecase = true
str = o.replace(str,"<a href=""medlemmar_info.asp?vem=$1"">$1</a> ")
end function
hmmm.... jag måste göra fel.
med Lars variant byttes allt i mitt recset ut mot
"namn namn2" när jag loopade ut..
med pirros variant fanns där inget innehåll alls när jag loopade ut =/
what to do?
tack
NY KOD:
<%function link(str)
dim o
set o = new regexp
o.pattern = "\[link\](.*?)\[/link\]"
o.global = true
o.ignorecase = true
str = o.replace(str,"<a href=""medlemmar_info.asp?vem=$1"">$1</a> ")
link = str
end function%>
OK! nu tor ja vi är på rätt väg.
Nu funkar det som det jag skrev först.
MEN fortfarande fel:
---------------------------
[link]namn[/link] [link]namn2[/link]
blir:
<a href="medlemmar_info.asp?vem=namn">namn</a>
<a href="medlemmar_info.asp?vem=namn2">namn</a>
Jag vill att det ska bli:
<a href="medlemmar_info.asp?vem=namn">namn</a>
<a href="medlemmar_info.asp?vem=namn2">namn2</a>
--------------------------
Går det att lösa?
Schysst!!
ska se sen
ok. schysst.
fungerar för mig....
Å för mig. 
ok, tack!!
ni har helt rätt. det var att jag använde den tillsammans med andra replace-funktioner.
men vad kan jag ha gjort fel då då?
Jag har en fil som heter kod.asp där alla replacear finns. sedan inkluderar jag den på sidorna. nu tog jag bort den här repleacen därifrån och lade in den enskilt på alla sidor. det funkade =/
tidigare så blev det antingen bara tomt när man loopade ut eller så blev det sådär att alla fick samma namn.
jaja, nu e det löst iaf. =/
tack =)
visa sidan