arkadaşlar ncelikle şimdiden hepinize teşekkürler. kaç gündür aramadığım yer kalmadı uygulamadığım neri kalmadı fakat sitemde bi türlü linkleri gizleyemedim. hangi siteye baksam aynı konular üzerinde duruluyor. bana Allah için biriniz yardımcı olunweb wiz 9x için geçerli forum_posts. asp ve functions_format_post. asp yi burada bana kodların eklenmiş halini verirseniz beni çok memnun edersiniz. benim gibi bir dünya kişi var bu sorun için çabalıyan.. sitelerin hepsinde bunu diyor;functions/functions_format_post. asp içerisine asagidaki kodu ekleyiniz...' ' Link Hide Block ' ' SheyTaNi Satirlar || SS || Satirlarin Sahibi' Coded By BeyazSeytan' Belasoft. net /. org - Webwizturk.com - CyberHosting. org'This function formats the hide blocksFunction AntiLinkForGuest Dim strHideMessageDim lngStartPosDim lngEndPosDim strBuildHideBlockDim strOriginalHideBlockif lngLoggedInUserID = 2 ThenDo While InStr(1, strMessage, "<a", 1) > 0 AND InStr(1, strMessage, "</a>", 1) > 0lngStartPos = InStr(1, strMessage, "<a", 1) + 2lngEndPos = InStr(lngStartPos, strMessage, "</a>", 1)If lngEndPos < lngStartPos Then lngEndPos = lngStartPos + 2If lngEndPos > lngStartPos Then strBuildHideBlock = "<table width=""95%"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0"">" strBuildHideBlock = strBuildHideBlock & vbCrLf & "<tr><td class=""bold"">Gizli Alan :<br>" strBuildHideBlock = strBuildHideBlock & vbCrLf & " <table width=""100%"" border=""0"" cellpadding=""1"" cellspacing=""0"" class=""BBquote"">" strBuildHideBlock = strBuildHideBlock & vbCrLf & " <tr>" strBuildHideBlock = strBuildHideBlock & vbCrLf & " <td><table width=""100%"" border=""0"" cellpadding=""2"" cellspacing=""0"" class=""BBquote"">" strBuildHideBlock = strBuildHideBlock & vbCrLf & " <tr>" strBuildHideBlock = strBuildHideBlock & vbCrLf & " <td class=""text"" style=""font-family: Courier New, Courier, mono;"">Linki grebilmek için üye olman?z gerekmektedir.</td>" strBuildHideBlock = strBuildHideBlock & vbCrLf & " </tr>" strBuildHideBlock = strBuildHideBlock & vbCrLf & " </table></td>" strBuildHideBlock = strBuildHideBlock & vbCrLf & " </tr>" strBuildHideBlock = strBuildHideBlock & vbCrLf & " </table></td>" strBuildHideBlock = strBuildHideBlock & vbCrLf & "</tr>" strBuildHideBlock = strBuildHideBlock & vbCrLf & "</table>"End iflngStartPos = InStr(1, strMessage, "<a", 1)lngEndPos = InStr(lngStartPos, strMessage, "</a>", 1) + 4If lngEndPos < lngStartPos Then lngEndPos = lngStartPos + 2strOriginalHideBlock = Trim(Mid If strBuildHideBlock <> "" ThenstrMessage = Replace(strMessage, strOriginalHideBlock, strBuildHideBlock, 1, -1, 1)ElsestrMessage = Replace(strMessage, strOriginalHideBlock, Replace(strOriginalHideBlock, "[", "[", 1, -1, 1), 1, -1, 1)End IfLoopend ifAntiLinkForGuest = strMessageEnd FunctionDaha Sonraforum_posts. asp içinde sat?r?n? arat?p hemen alt?na?unu ekleyiniz.. If InStr(1, strMessage, "<a", 1) > 0 AND InStr(1, strMessage, "</a>", 1) > 0 Then strMessage = AntiLinkForGuest yapıyorum olmuyor bana bi yardım edin duacınız olurum. ne mektup geliyor ne haber senden, syle de bileyim bıktın mı benden, her akşam güneşin battığı yerden, gzlerin doğuyor gecelerime...

evet yokmuş :) ne mektup geliyor ne haber senden, syle de bileyim bıktın mı benden, her akşam güneşin battığı yerden, gzlerin doğuyor gecelerime...

internette arastir onun icin. asp dosyasi cikmisitr... Akıllılar dvüşmeden nce kazanırlar, cahiller kazanmak için dvüşürler.

arkadaşlar hiç yardım edebilecek birisi yok mu bana şimdi ne mektup geliyor ne haber senden, syle de bileyim bıktın mı benden, her akşam güneşin battığı yerden, gzlerin doğuyor gecelerime...