merhaba arkadaşlar hazır fonksiyonlarda tam aradığmı buldum dedğim bir fonksiyon sorunlu çalışıyor sorun ise yazılan metnin bir alt satıra kayıp orada www.deneme.com yada http:// şeklinde baştan devam edince link li yazıların otomatik olarak linkleme yapılamaması, kodlara baktımda fakat hatayı bir türlü bulamadım. yardım edermisiniz.
kod:
<%
Function link_yap(strText)
strText = " " & strText
strText = ereg_replace(strText, "(^|[\n ])([\w]+?://[^ ,""\s<]*)", "$1<a href=""$2"">$2</a>")
strText = ereg_replace(strText, "(^|[\n ])((www|ftp)\.[^ ,""\s<]*)", "$1<a href=""http://$2"">$2</a>")
strText = ereg_replace(strText, "(^|[\n ])([a-z0-9&\-_.]+?)@([\w\-]+\.([\w\-\.]+\.)*[\w]+)", "$1<a href=""mailto:$2@$3"">$2@$3</a>")
strText = right(strText, len(strText)-1)
link_yap = strText
End Function
Function ereg_replace(strOrjinalString, strPattern, strReplacement)
dim objRegExp : set objRegExp = new RegExp
objRegExp.Pattern = strPattern
objRegExp.IgnoreCase = True
objRegExp.Global = True
ereg_replace = objRegExp.replace(strOrjinalString, strReplacement)
set objRegExp = nothing
End function
' ÇALIŞMAYANI: satır atlayıp başa linklenecek url gelince linklenmiyor
strLink="asdasd <br/>https://www.r10.net/id=9999&deneme=1&kim=ben deneme link "
'ÇALIŞANI : başına bir kelime veya yazı gelince linkleniyor
'strLink="asdasd <br/>deneme https://www.r10.net/id=9999&deneme=1&kim=ben deneme link "
response.Write link_yap(strLink)
%>
otomatik link verme sorunu çözemedim ?
8
●708
- 06-09-2012, 20:33:02
- 15-09-2012, 15:22:53gökalp onları sildim bu sefer http:// ile başlayan linklerde sorun veriyor örnek şöyle çıktı veriyor www.deneme.com" target="_blank">http://www.deneme.com anlamadım
- 15-09-2012, 18:24:16(^|[\n ]) kısmını (^|) olarak değiştirip dene.
\n alt satıra geçmek demek de denemek lazım ya şimdi. bi ordan sil bi burdan kodda sıkıntı yok
- 15-09-2012, 19:17:42asdasd
www.r10.net/id=9999&deneme=1&kim=ben">https://www.r10.net/id=9999&deneme=1&kim=ben deneme link
çıktı bu şekilde oldu http:// sıkıntı gitmedi yine - 19-09-2012, 09:37:24Üyeliği durduruldufonksiyon oluşturmuş ismine de ereg_replace demiş, dikkatinden kaçmış sanırım, php ile alakası yok.nicturkey adlı üyeden alıntı: mesajı görüntüle
müsait bi zamanda patterni hazırlayıp paylaşırım - 25-09-2012, 10:43:46benim merak ettiğim fonksiyon güze eskiden kullandığım bir fonksiyondu
ancak <img src=""https://www.r10.net/images/misc/vbulletin3_logo_white.gif""> ibareyi nasıl resim olarak gösteriyorsunuz
yazı içindeki başka bir url'den gösterilen resimlerde sıkıntı yaşatır çünkü?