<%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

  FoRuM

кαяαктєяιм ƒσяυм

FoRuM - SpoR

Bu kategoride daha hiçc konu yok!

Yeni konu aç:

Nickin:
Konu:

 Metin rengi:

 Metin büyüklüğü:
Tag leri kapat


Bütün konular: 2
Bütün postalar: 7
Bütün kullanıcılar: 1
 
 
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")) %>
 
IP
 
 
Bugün 12 ziyaretçi (17 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