Forum...HJÆLP!

hvis altså de skriver det ... :)

1.
<%
Alt hvad der skrives her vises ikke i browser
her skrives kun ASP-kode.
%>
2. Tilføj: <a href='http://www.eksperten.dk'>Eksperten</a>

hvordan får jeg fixet det? Det var spørgsmålet...Sorry hvis ikke jeg forklarede det godt nok

jeg er jo kun 14

det med linket...Hvis du skriver:
blablablabla http://www.eksperten.dk efterlink

så skal "http://www.eksperten.dk" blive lavet om til et link men "efterlink" skal ikke være inkluderet i linket

hmmm....ingen svar?

Jeg bruger følgende funktion til at lave tekst om til klikbare links:

<%
Function makeLinks(inText)
Dim objRegExp, strBuf
Dim objMatches, objMatch
Dim Value, ReplaceValue, iStart, iEnd

  strBuf = ""
  iStart = 1
  iEnd = 1
  Set objRegExp = New RegExp

  objRegExp.Pattern = "\b(www|http|\S+@)\S+\b"
  objRegExp.IgnoreCase = True
  objRegExp.Global = True
  Set objMatches = objRegExp.Execute(inText)
  For Each objMatch in objMatches
    iEnd = objMatch.FirstIndex
    strBuf = strBuf & Mid(inText, iStart, iEnd-iStart+1)
    If InStr(1, objMatch.Value, "@") Then
      strBuf = strBuf & GetHref(objMatch.Value, "EMAIL", "_BLANK")
    Else
      strBuf = strBuf & GetHref(objMatch.Value, "WEB", "_BLANK")
    End If
    iStart = iEnd+objMatch.Length+1
  Next
  strBuf = strBuf & Mid(inText, iStart)
  makeLinks = strBuf
End Function


Function GetHref(url, urlType, Target)
Dim strBuf

  strBuf = "<a href="""
  If UCase(urlType) = "WEB" Then
    If LCase(Left(url, 3)) = "www" Then
      strBuf = "<a href=""http://" & url & """ Target=""" & _
              Target & """>" & url & "</a>"
    Else
      strBuf = "<a href=""" & url & """ Target=""" & _
              Target & """>" & url & "</a>"
    End If
  ElseIf UCase(urlType) = "EMAIL" Then
    strBuf = "<a href=""mailto:" & url & """ Target=""" & _
            Target & """>" & url & "</a>"
  End If
 
  GetHref = strBuf

End Function
%>

Funktionen kaldes f.eks. sådan her:

<%=makeLinks("Blabla http://www.eksperten.dk bla bla")%>

så bliver det bagefter også til et link

Det plejer det ikke at gøre hos mig. Du skal sørge for at der er mellemrum på begge sider af adressen - ellers vil det ikke virke.

bare lige en test på exp:

http://www.asp.dk/ asd

det skal være ligesom der...hvis der er en / +mellerum slutter det...hvordan?

spm. 2 har jeg selv løst

du får 25 point....

takker :)