Delete a query : Query « Access « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Access
  3. Query

Delete a query

 

Private Sub TimeToCompletionI()

    Dim db As Database
    Set db = CurrentDb
    
    Dim qry1 As QueryDef
    Dim sSQL1 As String
    
    On Error Resume Next
    db.QueryDefs.Delete "temp1"
    On Error GoTo 0
    
    sSQL1 = "SELECT * from Employees"
    
    Set qry1 = db.CreateQueryDef("temp1", sSQL1)
    
    DoCmd.OpenQuery qry1.Name

End Sub








Related examples in the same category

1.Creating a Pass-Through Query with ADOX
2.Executing a Pass-Through Query Saved in Access
3.Making Bulk Changes
4.Using a Stored Procedure to Make Bulk Changes to Data in a SQL Server Database
5.Creating a Query Using Code
6.Create Query by using the Database.CreateQueryDef
7.User Defined Property
8.Get the created query name
9.Pass parameter to a query
10.Using CreateParameter to delete a company record
11.Execuate query
12.Update a table with QueryDef