Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Egen länktext genom regExp

Postades av 2007-05-24 12:51:24 - Björn Jansson, i forum regular expressions, Tråden har 1 Kommentarer och lästs av 2364 personer

Hej!

Jag skulle vilja ha lite hjälp med hur jag kan tillåta länkar. Funktionen nedan får en text (från en gästbok) skickad till sig och gör om vanlig text till länkar, typ:
www.gp.se -> www.gp.se

Jag vill kunna styra vilken text som ska visas (i fallet ovan alltså www.gp.se). Har försökt mig på diverse olika alternativ, men får det inte att funka. Någon som känner sig manad?

Tacksamt!

Edit: helst så ska det fungera på ett lurigt sätt, så att bara jag vet hur man gör. Typ:
<a url="http://www.url.com">text</a>

<code=asp>
Function Link(strText)
strText = Server.HTMLEncode(strText)

Set regExp = New regexp

regExp.Global = true
regExp.IgnoreCase = true


regExp.Pattern = "(http://|www|https://)([\S]*)"
strText = regExp.Replace(strText,"$1$2")

regExp.Pattern = "(ftp://)([\S]*)"
strText = regExp.Replace(strText,"$1$2")

regExp.Pattern = "([\S]*@[\S]*[.se|.com|.nu|.net|.org])"
strText = regExp.Replace(strText,"$1")

regExp.Pattern = "([.|,|!|?|:|;|)|\|&]]*)</a> "
strText = regExp.Replace(strText,"</a>$1 ")

regExp.Pattern = "([.|,|!|?|:|;|)|\|&]]*)"" class=""link"" target=""_blank"">([^<]*)</a>"
strText = regExp.Replace(strText,""">$2</a>")

strText = Replace(Trim(strText),vbCrLf, "<br>")
strText = Replace(Trim(strText),"http://http://", "http://")

if instr(strText, "http://https://") > -1 then
strText = Replace(strText, "http://h", "h")
end if
Link = strText ' Skriver ut texten

End Function
</code>


Svara

Sv: Egen länktext genom regExp

Postades av 2007-05-24 18:02:45 - Thomas Vanhaniemi

Kolla in ett tips jag skickade in för ett bra tag sedan om det kan hjälpa: ["Aktivera" länkar och e-post adresser i en text]


Svara

Nyligen

  • 09:09 Vill du köpa medicinska tester?
  • 12:47 Vem beviljar assistansen – kommune
  • 14:17 Någon med erfarenhet av hemstädnin
  • 14:14 Bör man använda sig av en båtförme
  • 14:12 Finns det någon intressant hundblo
  • 14:25 Tips på verktyg för att skapa QR-k
  • 14:23 Tips på verktyg för att skapa QR-k
  • 20:52 Fungerer innskuddsbonuser egentlig

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 569 153
27 952
271 704
728
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies