<%dsn="DBQ=" & Server.Mappath("vt.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open dsn set rs = Server.CreateObject("ADODB.RecordSet") SQL="SELECT * FROM Tablo_Sayac order by id desc" rs.open SQL,conn,1,3 rs("sayac") = rs("sayac") - 1 rs.update%> <%=rs("sayac")%>
Ana Sayfa
İletişim
ZiYaReTçİ dEfTeRİ
FoRuM
Yeni sayfanın başlığı
qeqe
Yeni sayfanın başcdlığı
Yeni wqwdd
Yeni sferfayfanın başlığı
qdqwdwqdwqşlığı
Yeni sayedqwd awdfanın başlığı
Yeni sayfanın başlrf4wertf4wığı
wqde
sdqdqw
fefew
Ana Sayfa
INFOMELDUNG_LOGINBOX
programlar
<% '100 den geri saymak için... IF Application("Sayac")*1=0 Then Application("Sayac")=101 Application("Sayac") = Application("Sayac") -1 Response.Write(Application("Sayac")) %>
Ücretsiz Online Ziyaretçi Sayacı
Bugün 1 ziyaretçi (1 klik) kişi burdaydı!
Bu web sitesi ücretsiz olarak
Bedava-Sitem.com
ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol
