<% Response.Buffer = True Response.Expires = -1 Response.ExpiresAbsolute = Now() - 2 Response.AddHeader "pragma","no-cache" Response.AddHeader "cache-control","private" Response.CacheControl = "No-Store" veri_yolu = "db/dbdefter.mdb" Dim db, rs, i, bg, bolum Dim kayit_destesi, sayfadaki_deste_sayisi, toplam_kayit_sayisi, sayfa, sayfa_max_adet Dim konu, mesaj, tarih Dim saat, dakika, saniye, gun, ay, yil, hafta set bag = server.createobject("adodb.connection") bag.open = "provider=microsoft.jet.oledb.4.0;data source="& server.mappath(""& veri_yolu &"") &";" %> Erenbeken.com
 
    

Hakkında 

Ziyaretçi Defteri

  Erenbeken.com © 2006 Tüm hakları saklıdır...

HAKKINDA.

SAYFA YAPIM AŞAMASINDADIR...

  <% Else For i = 0 To TopFeatured - 1 Step Skip Offset = RND * (Skip - 1) %>

  <%=left(Application("Featured")(3,i + Offset),150)%>

<% next end if %>