Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
04/11/2008 13:22
Konu Sahibi
nihatkr
Yorumlar
11
Okunma
3924
Konuyu Oyla:
  • Derecelendirme: 3/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 3/5 - 1 oy
Kullanici Avatari

nihatkr


 814
 89
 29/10/2008
272
 İstanbul
 
 Ofis 2007
 03/09/2016,04:40
Formlarınızın Kaç Defa Açıldığını Merak Ediyormusunuz.

Burun Örnek Uygulamaya.

Örnek Alıntıdır.


Ek Dosyalar
.rar   Kaç Defa Açıldı.rar(Dosya Boyutu: 36,84 KB / İndirme Sayısı: 246)

Kullanici Avatari

Puletin


 Belirtilmemiş
 1.717
 40
 01/11/2008
416
 -
 
 Ofis 2003
 24/12/2016,00:18
Teşekkürler hocam eline sağlık
Az


Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...

Kullanici Avatari

Bilgisayarcı


 Belirtilmemiş
 658
 34
 29/01/2008
410
 Antalya
 
 Ofis 2003
 01/11/2011,15:17
Şu da mümkün. Örnek olması açısından.

Kod:
1
2
3
4
5
6
7
Sub formsay(Form As String)
Dim s  As String
  s = "update hesap set " & Form & "=" & Form & "+1"
  DoCmd.SetWarnings False
  DoCmd.RunSQL s
  DoCmd.SetWarnings True
End Sub

Ama kaç tane form varsa o kadar field eklemekte zor.
Form Adet olacak şekilde bir tablo olsa daha hızlı olur gibi.

Kod:
1
2
3
4
5
6
7
Sub formsay(Form As String)
Dim s  As String
  s = "update hesap set Adet=nz(Adet,0)+1 where Form='" &form &"'"
  DoCmd.SetWarnings False
  DoCmd.RunSQL s
  DoCmd.SetWarnings True
End Sub

Hatta önce satır var mı diye kontrol edip (DcounT) sonra updae veya insert daha iyi olur. En azından programı hazırlarız bu kodu gömeriz gerisini o halleder.



Kullanici Avatari

bayFARUK


BA.... FA....
 43
 85
 17
 30/10/2008
37
 Sivas
 müdür
 Ofis 2010 64 Bit
 14/04/2018,11:09
programın kaçdefa açıldığı ve enson açılış tarihi ve saatine bir örnek
Gelir gider programı


Ek Dosyalar
.rar   gelir_gider.rar(Dosya Boyutu: 622,63 KB / İndirme Sayısı: 68)
[Resim: gif48.gif]

Kullanici Avatari

malidolu


 40
 65
 10
 12/09/2009
15
 İstanbul
 
 Ofis XP
 01/10/2018,18:01
teşekkürler Allah razı olsun bir şeyler öğreniyoruz


malidolu, 12-09-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

benremix


RA.... SO....
 51
 4.441
 127
 17/05/2009
365
 Ankara
 Şirket Sahibi
 Ofis 2010 64 Bit
 Dün,21:54
Katkı ve paylaşımlarınızdan dolayı emeği geçenlere teşekkürler. Saygılar...


Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.


Access için her zaman lazım olacak konu başlıkları listesi




Konuyu Okuyanlar: 1 Ziyaretçi

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.
123444