Yeni Kayıt
Konudaki Resimler
< Bu mesaj bu kişi tarafından değiştirildi sexycadi86izmir -- 4 Kasım 2010; 18:00:50 > |
Hızlı 
Bildirim
Keywords kelimeleri için Aynı kelimeleri kaldırma nasıl olur
Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla 
Bu Konudaki Kullanıcılar:
Daha Az 
2 Misafir - 2 Masaüstü
Giriş
Mesaj
-
-
bu yolla önce bir kelimedeki 'noise' kelimeler ( tek başına anlamsız denilebilir) diye tabir edilen kelimelerin atılması gerekir. (ve, ile, ya da gibi... )
onu yaptıktan sonra şöyle bir kod yazdım ayaküstü ama uzun zamandır 1. nesil ASP yazmadığım için derlerken hata verebilir onları debug etmen gerekecektir.
bu koda virgullerler ayrılmış bir string vermelisin.
Dim yer1 as integer
Dim yer2 as integer
Dim yenikeywords as string
Dim ayiklanacakKelime as string
Dim AyiklanmisKelime as string
ayiklanacakKelime = "Arkadaşlar,asp,ile,uğraştığım,sayfa,için,access,veritabanından,başlık,olan,cümleleri,keywords,e,atadım."
yer1 =1
yer2 =0
yenikeywords=""
AyiklanmisKelime = ""
Do while instr(yer1,ayiklanacakKelime, ",") > 0
yer2=instr(yer1,ayiklanacakKelime, ",")
if instr(yer1,yenikeywords, mid(me.yourfield, yer1 , yer2 - yer1 )) = 0
yenikeywords=yenikeywords& mid(me.yourfield, yer1 , yer2 - yer1 ) &", "
End If
yer1 = yer2 +1
yer2 = 0
Loop
AyiklanmisKelime = yenikeywords
Sayfa:
1
Ip işlemleri
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
