Prepoznavanje HTML linka

Prepoznavanje HTML linka

offline
  • Pridružio: 18 Apr 2003
  • Poruke: 8134
  • Gde živiš: U kesici gumenih bombona...

trazio, trazio i nasao... Smile. da bi radilo i za nase stranice, mora malo da se prepravi...


Sub MakeHyperlinks(sContents)
Dim re, oMatches, oMatch, sURL, sLabel

Set re = New RegExp
re.Pattern = "(http://|https://|ftp://|gopher://)?([\w+-_]+\.)+(biz|com|gov|edu|name|net|org|us|uk|ca|au|jp) (/[\w-_\.]+)+(\??\S+)"
re.Global = True
re.IgnoreCase = True
re.Multiline = True
sContents = re.Replace(sContents, "<a href=""$1$2$3$4$5"" target=""_blank"">$2$3</a>")
End Sub

a koristi se na razne nacine. jedan od njih je:
sContents = "Trebalo bi posetiti [Link mogu videti samo ulogovani korisnici] iako sajt jos nije zavrsen Smile"
MakeHyperlinks(sContents)
Response.Write(sContents)

- preuzeto sa [Link mogu videti samo ulogovani korisnici]



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Ko je trenutno na forumu
 

Ukupno su 2062 korisnika na forumu :: 57 registrovanih, 2 sakrivenih i 2003 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 015, 100jan, Aristotle2002, Ba4e, bavar357, bojan1234, branko87, C-Gun, crazydkure, Dimitrije Paunovic, Donneraj, dukajov, dushan, Dzigy, Gintoki, gorankuba, hyla, Igor Antonic, ikan, laurusri, lcc, Levi, Macalone, Marko Marković, Marko1238, markolopin, Marky, Medojed, Metanoja, Milometer, nesa1962, nikoladim, Nikolajevic, nisamBot, nnovakis, OKT, pceklic, Pilipenda, Prečanin30, razumihin, redstar72, rodoljub, sarma, Shadows1, Srky Boy, sspp, Stod, tamno.nebo, tuf, Vanderx, vathra, Velizar Laro, vidra1, Vlada78, zivojin32, zmajbre, zora