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.
