I need to create a query in Access using vb called qryIDCount but
I get an error if the query already exists. So I can either try to
delete the query object or try to update the query to select from
a different table. The query name needs to remain the same if it
exists because it is used in a report. I have tied both methods
and both return errors.
This is the one to alter it if it exists.
This is the one to delete if exists.VB Code:
If bQryExists = True Then sSQL = "ALTER VIEW qryIDCount AS SELECT [" & cboComputer & "_" & cboLogType & "].Message," sSQL = sSQL & " Count([" & cboComputer & "_" & cboLogType & "].Message) AS evtCount" sSQL = sSQL & " FROM [" & cboComputer & "_" & cboLogType & "]" sSQL = sSQL & " GROUP BY [" & cboComputer & "_" & cboLogType & "].Message;" goEnv.Cnn.Execute sSQL End If
Any ideas?VB Code:
sSQL = "CREATE VIEW qryIDCount AS SELECT [" & cboComputer & "_" & cboLogType & "].Message," sSQL = sSQL & " Count([" & cboComputer & "_" & cboLogType & "].Message) AS evtCount" sSQL = sSQL & " FROM [" & cboComputer & "_" & cboLogType & "]" sSQL = sSQL & " GROUP BY [" & cboComputer & "_" & cboLogType & "].Message;" goEnv.Cnn.Execute sSQL
Thanks in advance for any help.





Reply With Quote