1. sayfa
Function Cevir(strVeri) If strVeri = "" Then Exit Function Set objRegExp = New Regexp With objRegExp .Pattern = "<.*?>" .IgnoreCase = False .Global = True End With Cevir = objRegExp.Replace(strVeri,"") End Function Function YaziKirp(Metin,Stryaziuzunluk,Adres) Metin=Left(Cevir(Metin),Stryaziuzunluk)&" ...<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=22328202&url=&Adres&" data-href="&Adres&">..devamı>></a>" YaziKirp=Metin End Function
Ticaret Okulu için hazırladığımız bu projemiz sitedeki gelişmeleri kullanıcılarına ulaştırmak için üyelerine özel olarak hazırlanmıştır. <A href="http://www.ticaretokulu.com/Forums/viewtopic/t=1072.html" target=_blank><IMG src="http://www.enderarslanturk.com.tr/Resimler/Makaleler/Projeler/6a.Jpg" border=0></a> Standart bildiğimiz rss okuyucuları gibi olmayan Rss Haber Alarmı programı ile; a. Son açılan başlıkların listelenmesi, b. Son yapılan yorumların listelenmesi, c. Online kişi sayısı, d. Tüm üyelerin listesi gibi özelliklere sahiptir.
DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz. Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.
Veritabanındaki bilgi
Veeeeeee Sonuç
< Resime gitmek için tıklayın >
Bu olayı nasıl düzeltebiliriz.
DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.
                        
Üye Ol Şimdi DeğilÜye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.