(03/06/2019, 16:27)Yunus Bozkurt yazdı: sorunu çözdüm şimdiden teşekkürler.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.
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.
İnadına, ille de Accesstr.net...