Waarschuwingen Uitzetten

[Dave12345]

Goedenmiddag,

Ik heb een database waar een paar automatische handelingen en berekeningen in zitten dmv query's.

Dit zijn veel bijwerk,verwijder en toevoegquery's, maar elke keer als ik een query wil openen krijg ik een waarschuwing (weet u zeker ......???). Is er een mogelijkheid dit uit te zetten, ik kan het namelijk niet vinden!

Bij voorbaat dank,

Dave Rutten

 

[Bartuls]

Simpel,

DoCmd.SetWarnings False

Als je ze weer aan wilt zetten dan gebruik je de volgende verrassende code:

DoCmd.SetWarnings True

 

[Dave12345]

Mag ik ook vragen hoe je die query dan benadert in Visual Basic???

Groet dave

 

[Bartuls]

Dim qd As QueryDef
Dim db As Database

Set db = CurrentDb()
Set qd = db.QueryDefs("JouwQuery")

DoCmd.SetWarnings False
qd.Execute
DoCmd.SetWarnings True

Set qd = Nothing
Set db = Nothing

 

[beheer25]

Op met:

docmd.setwarnings false
docmd.openquery "jouwquery"
docmd.setwarnings true


Grtz,