Advanced Search

queryExists(String) As Boolean

/ Published in: Visual Basic
Save to your folder(s)
This method checks whether a query with the given name exists.

Expand | Embed | Plain Text

Copy this code and paste it in your HTML 
  1. Private Function queryExists(name As String) As Boolean
  2.   Dim queryDef As DAO.queryDef
  3.  
  4.   For Each queryDef In CurrentDb.QueryDefs
  5.     If queryDef.name = name Then
  6.       queryExists = True
  7.       Exit Function
  8.     End If
  9.   Next
  10.  
  11.   queryExists = False
  12. End Function

Report this snippet


Comments

RSS Icon Subscribe to comments

You need to login to post a comment.