<%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")%>
   
 
  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 14 ziyaretçi (20 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