<% sql="select * from so_general where counter<2 order by id;" set veriler=mysql_baglanti.execute(sql) if not veriler.eof then so_title2=veriler("title") so_keywords=veriler("keywords") so_description=veriler("description") so_url=veriler("url") so_theme=veriler("theme") so_logo=veriler("logo") so_favicon=veriler("favicon") so_lang=veriler("lang") so_username=veriler("username") so_usermail=veriler("usermail") so_listeleme_siniri=veriler("listeleme_siniri") so_anasayfa_listeleme_siniri=veriler("anasayfa_listeleme_siniri") so_benzer_listeleme_siniri=veriler("benzer_listeleme_siniri") so_analytics_aktif=veriler("analytics_aktif") so_istatistik_aktif=veriler("istatistik_aktif") so_analytics_kod=veriler("analytics_kod") else session("uyari")="Bu siteyi birden fazla alan adında kullanmaya veya izinsiz dağıtım yapmaya çalıştınız.
Daha fazla bilgi için lütfen;
Siberortak Kullanım Koşulları web sayfasından bilgi alabilirsiniz." response.Redirect("/error.asp") end if if len(request.Cookies("lang"))>0 then so_lang=request.Cookies("lang")("name") else response.cookies("lang")("name")=so_lang end if function hrf1(hro) hro = Replace (hro ,"I","i",1,-1,1) hrf1=Lcase(hro) end function strURL = Request.ServerVariables("QUERY_STRING")&"///" bolum = split(strURL,"/") sayfa = temizlik(bolum(2)) sayfa = temizlik(hrf1(bolum(3))) serino = temizlik(bolum(4)) uc = temizlik(hrf1(bolum(3))) bes = temizlik(bolum(5)) alti = temizlik(bolum(6)) %> <% if sayfa = "feed" then %> <% session("pageStyle")="rss" so_title="RSS" secili_kategori=0 response.Redirect "/rss-feed.asp" %> <% elseif sayfa = "logout" then %> <%response.Redirect("logout.asp")%> <% elseif sayfa = "profile" then %> <% so_title=so_title2&" | "&ucase(session("uye_isim"))&" "&ucase(session("uye_soyisim")) so_keywords=so_title2 so_description=so_title2 session("pageStyle")="profile" secili_kategori=0 %> <% elseif sayfa = "member" then %> <% so_title=so_title2&" "&lang_yeni_uyelik so_keywords=so_title2&","&lang_yeni_uyelik so_description=so_title2&" "&lang_yeni_uyelik session("pageStyle")="member" secili_kategori=0 %> <% elseif sayfa = "password" then %> <% so_title=so_title2&" "&lang_sifremi_unuttum so_keywords=so_title2&","&lang_sifremi_unuttum so_description=so_title2&" "&lang_sifremi_unuttum session("pageStyle")="password" secili_kategori=0 %> <% elseif sayfa = "search" then %> <% session("pageStyle")="listeleme" if request.Form("SID")=session.SessionID then session("aramasonucu")=request.Form("aracubuk") end if so_title=so_title2&" | "&session("aramasonucu") so_keywords=session("aramasonucu")&","&lang_arama_buton so_description=so_title2&" - "&lang_arama_buton&" "&session("aramasonucu") secili_kategori=0 %> <% elseif sayfa = "cat" then%> <% session("pageStyle")="listeleme" sql="select * from so_categories where link='"&serino&"';" set veriler=mysql_baglanti.execute(sql) if not veriler.eof then kategori_basligim=veriler("baslik") so_title=veriler("baslik")&" | "&so_title2 so_keywords=veriler("baslik")&", "&so_title2 so_description=so_title2&" - "&veriler("baslik") secili_kategori=cint(veriler("id")) else secili_kategori=0 end if %> <%elseif instr(sayfa,".html")>0 then%> <% session("pageStyle")="icerik" sqlk="select * from so_content where link='"&sayfa&"' and sayfaYayinda=1;" set verilerk=mysql_baglanti.execute(sqlk) if not verilerk.eof then so_content_idno=verilerk("id") so_title=verilerk("baslik")&" | "&so_title2 'ok so_content_title=verilerk("baslik") 'ok so_keywords=verilerk("keywords") so_description=verilerk("descriptions") so_content_etiketler=verilerk("etiketler") so_content_link=verilerk("link") so_content_thumbnail=verilerk("thumbnail") so_content_icerik=utf8cevir(verilerk("icerik")) 'ok so_content_tip=verilerk("tip") so_content_dil=verilerk("dil") so_content_anasayfa_yayin=verilerk("anasayfa_yayin") so_content_kategori=verilerk("kategori") so_content_butonlari_aktif=verilerk("content_butonlari_aktif") so_content_uyelere_ozel=verilerk("uyelere_ozel") so_content_tablar_aktif=verilerk("tablar_aktif") so_content_foto_galeri=verilerk("foto_galeri") so_content_video_galeri=verilerk("video_galeri") so_content_dokuman_galeri=verilerk("dokuman_galeri") so_content_uye_yorumlari=verilerk("uye_yorumlari") so_content_benzer_icerikler=verilerk("benzer_icerikler") so_content_formlar=verilerk("formlar") secili_kategori=so_content_kategori 'OTO ANAHTAR KELİMELER If len(verilerk("keywords"))<1 Then kelime_sayisi=KelimeSayisi(verilerk("baslik")) dizi = SPLIT(verilerk("baslik"), " ", -1, 1) otomatik_anahtar_kelimeler=so_title2 for Each kelimem in dizi otomatik_anahtar_kelimeler=otomatik_anahtar_kelimeler&", "& kelimem next if kelime_sayisi>1 then so_keywords=otomatik_anahtar_kelimeler&", "&so_content_title else so_keywords=otomatik_anahtar_kelimeler end if end if 'OTO ANAHTAR KELİME BİTİŞ 'OTO ETİKETLER If len(verilerk("etiketler"))<1 Then kelime_sayisi=KelimeSayisi(verilerk("baslik")) dizi = SPLIT(verilerk("baslik"), " ", -1, 1) otomatik_etiketler="" for Each kelimem in dizi otomatik_etiketler=otomatik_etiketler&", "& kelimem next if kelime_sayisi>1 then so_content_etiketler=otomatik_etiketler&", "&so_content_title else so_content_etiketler=otomatik_etiketler end if end if 'OTO ETİKETLER BİTİŞ 'OTO AÇIKLAMA If len(verilerk("descriptions"))<1 Then if len(utf8cevir(verilerk("icerik")))<1 then so_description=left(verilerk("baslik"),160) else so_description=left(HtmlEncodeYazi(utf8cevir(verilerk("icerik"))),160) end if end if 'OTO AÇIKLAMA BİTİŞ else session("uyari")=lang_sayfa_bulunamadi response.Redirect("/") end if set verilerk=nothing set sqlk=nothing %> <%end if%>