Errors but not warnings ?

[asearle]

Hi Everyone,

I have created a script (VBA program) which runs a chain of queries to do some simple processing. The queries will run either using currentdb.execute (with SQL) and/or docmd.openquery (with the SQL written to the appropriate query).

As it is, I have opted for docmd.openquery because this gives me the option to switch warnings on (docmd.setwarnings true) in order to check the work of the queries.

However, what I would really like to be able to do is to switch warnings off but tell the system to report errors if they occur.

So my question is whether this is possible? Can I tell the queries to report errors but not warnings?

That would be a great help to me.

Many thanks,
Alan Searle

[NoellaG]

Hi,

for trapping real errors you can of course use the normal error handling (on error goto ...) and the err object.
If you want to know how many records are returned or affected by your query you can use the cmd object. An example of using the cmd object to perform an action query and store the number of records that were affected in the variable lngAffected:

    Dim cmd As New ADODB.Command
    Dim cnn As ADODB.Connection
    Dim lngAffected As Long
    
    Set cnn = CurrentProject.Connection
    cmd.ActiveConnection = cnn
    cmd.CommandType = adCmdText
    cmd.CommandText = "Update tblTest set fldChangedOn = Now()"
    cmd.Execute lngAffected

[RuralGuy]

Try:
currentdb.execute YourSQL, dbFailOnError

[asearle]

Hi Guys,

Many thanks: Both these recommendations will come in extremely handy.

Many thanks,
Alan Searle