Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
03/06/2019 15:57
Konu Sahibi
Yunus Bozkurt
Yorumlar
3
Okunma
266
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Yunus Bozkurt

Yunus Bozkurt

Aktif Üye
38706
Yu.... Bo....
 44
 48
 195
 18/08/2011
0
 Sinop
 
 Ofis 2010 64 Bit
 18/07/2019,18:17
Çözüldü 
kodum şu şekilde

Visual Basic Code
Private Sub Komut12_Click()
DoCmd.SetWarnings False
DoCmd.OpenQuery "s_mkn_AylikDataTemizle"
DoCmd.OpenQuery "s_mkn_AylikDataYap"
End Sub


 s_mkn_AylikDataYap sorgum t_aylikgeciciDatalar diye bir tablo oluşturuyor.
fakat t_aylikgeciciDatalar tablosu daha önceden oluşturulmamışsa komut çalışmıyor. istediğim veri tabanımda t_aylikgeciciDatalar tablosu yoksa direk DoCmd.OpenQuery "s_mkn_AylikDataYap komutunu çalıştırmak



  • En tehlikeli kelime ama’dır. Önceden söylenen her söylemi veya kelimeyi öldürür! Mesela, seni seviyorum ama gibi…

Yunus Bozkurt

Yunus Bozkurt

Aktif Üye
38706
Yu.... Bo....
 44
 48
 195
 18/08/2011
0
 Sinop
 
 Ofis 2010 64 Bit
 18/07/2019,18:17
sorunu çözdüm şimdiden teşekkürler.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public Function IsTableExists(ByVal strTableName As String) As Boolean
On Error Resume Next
IsTableExists = IsObject(CurrentDb.TableDefs(strTableName))
End Function

Private Sub Komut12_Click()

 If IsTableExists("t_mkn_aylikGecici") Then
   DoCmd.OpenQuery "s_mkn_AylikDataTemizle"
   DoCmd.OpenQuery "s_mkn_AylikDataYap"
    Else
    DoCmd.OpenQuery "s_mkn_AylikDataYap"
End If
DoCmd.OpenReport "r_mkn_aylikharcamalar", acViewPreview

End Sub


bu fonksiyonu forma koymak yada modul olarak kullanmak arasında bir fark var mıdır? başka bir yerde kullanmayacağım.


  • En tehlikeli kelime ama’dır. Önceden söylenen her söylemi veya kelimeyi öldürür! Mesela, seni seviyorum ama gibi…

...........
mehmetdemiral

mehmetdemiral

Uzman
17
Me.... De....
 54
 219
 4.943
 30/10/2008
 Samsun
 Öğretmen
 Ofis 2013 32 Bit
 17/07/2019,12:55
(03/06/2019 16:27)Yunus Bozkurt Adlı Kullanıcıdan Alıntı: sorunu çözdüm şimdiden teşekkürler.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public Function IsTableExists(ByVal strTableName As String) As Boolean
On Error Resume Next
IsTableExists = IsObject(CurrentDb.TableDefs(strTableName))
End Function

Private Sub Komut12_Click()

 If IsTableExists("t_mkn_aylikGecici") Then
   DoCmd.OpenQuery "s_mkn_AylikDataTemizle"
   DoCmd.OpenQuery "s_mkn_AylikDataYap"
    Else
    DoCmd.OpenQuery "s_mkn_AylikDataYap"
End If
DoCmd.OpenReport "r_mkn_aylikharcamalar", acViewPreview

End Sub


bu fonksiyonu forma koymak yada modul olarak kullanmak arasında bir fark var mıdır? başka bir yerde kullanmayacağım.

Başka yerde kullanmayacaksanız kod olarak yazmak daha mantıklı tabii ki. Eğer global olarak her yerde kullanacaksanız modül yapılır.


İnadına, ille de Accesstr.net...

Yunus Bozkurt

Yunus Bozkurt

Aktif Üye
38706
Yu.... Bo....
 44
 48
 195
 18/08/2011
0
 Sinop
 
 Ofis 2010 64 Bit
 18/07/2019,18:17
Sorun Çözüldü



  • En tehlikeli kelime ama’dır. Önceden söylenen her söylemi veya kelimeyi öldürür! Mesela, seni seviyorum ama gibi…

...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Alt Tablolardan Oluşmuş Ana Tabloda Sorgulama Nasıl Yapılır ? A_day 7 336 11/02/2019, 22:08
Son Yorum: halily
Çözüldü Farklı Tablolardaki Verileri Tek Raporda Sorgulama av.fatihberber 2 302 11/10/2018, 08:52
Son Yorum: av.fatihberber
Çözüldü Hata: Birinci Tablonun Başvurulan Alanı İçin Benzersiz Dizin Bulunamadı.hatası kursun 4 405 15/09/2018, 12:52
Son Yorum: ozanakkaya
Çözüldü Hata: Birinci Tablonun Başvurulan Alanı İçin Benzersiz Dizin Bulunamadı.hatası kursun 8 536 15/09/2018, 12:51
Son Yorum: ozanakkaya
Çözüldü Sorgulama Hatası Yunus Bozkurt 2 443 03/04/2018, 14:19
Son Yorum: Yunus Bozkurt

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