Embedded Files
Public Function IqQueryExist(NomdeRequête As String) As Boolean
On Error Resume Next
IqQueryExist = (CurrentDb.QueryDefs(NomdeRequête).Name = NomdeRequête)
CurrentDb.Close
End Function
Page updated
Google Sites
Report abuse
Public Function IqQueryExist(NomdeRequête As String) As Boolean
On Error Resume Next
IqQueryExist = (CurrentDb.QueryDefs(NomdeRequête).Name = NomdeRequête)
CurrentDb.Close
End Function