AccessTr.neT
Bir Tablonun Var Olup Olmadığını Sorgulama - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Bir Tablonun Var Olup Olmadığını Sorgulama (/konu-bir-tablonun-var-olup-olmadigini-sorgulama.html)



Bir Tablonun Var Olup Olmadığını Sorgulama - Yunus Bozkurt - 03/06/2019

kodum şu şekilde
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


Cvp: Bir Tablonun Var Olup Olmadığını Sorgulama - Yunus Bozkurt - 03/06/2019

sorunu çözdüm şimdiden teşekkürler.

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.


Cvp: Bir Tablonun Var Olup Olmadığını Sorgulama - mehmetdemiral - 03/06/2019

(03/06/2019, 16:27)Yunus Bozkurt yazdı: sorunu çözdüm şimdiden teşekkürler.

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.


Cvp: Bir Tablonun Var Olup Olmadığını Sorgulama - Yunus Bozkurt - 04/06/2019

Sorun Çözüldü