Runtime report greška

Da bih izbegao prikaz praznih izveštaja, za Report sam postavio sledeći kod:

To je sve u redu kada se aplikacija koristi u punoj verziji Accessa (2007 ako je bitno). Message box lepo javi da nema podataka, sa OK se potvrdi da je poruka primljena k znanju, a prazan report se ne otvara.
Ali, u runtime okruženju, nakon OK klika, javlja se i sledeća greška:



Kako da je izbegnem?

On Error Resume Next

u kodu koji poziva report.

Potpis

Pozdrav,
Branislav

U tom slučaju iskoči ova greška:



U full Accessu je opet sve OK.

Liči mi da imaš neku drugu grešku onda.

Princip je da kad koristiš OnNoData događaj da prekineš otvaranje izveštaja (Cancel = True) onda program koji poziva izveštaj dobije od izveštaja grešku da postupak nije uspešno obavljen. Ta greška mora da se "tretira" tj. "hendluje".

Zato ono On Error Resume Next kaže "ako se desi greška, zanemari je i nastavi dalje izvršavanje" jer očekujemo da se desi i znamo koja je. To "On Error Resume Next" ne stavljaš u OnNoData već u Sub koji poziva izveštaj.

Ako ima više linija programa osim one koja poziva izveštaj u toj procedure, onda može ovako:

If Err.Number <> 2501 Then Msgbox Err.Description
Resume Next


Err.Number = 2501 je greška od izveštaja (neuspešno otvaranje).

Provereno radi tako.

Potpis

Pozdrav,
Branislav

Ma prilično mi je jasno kako to funkcioniše, bar sam mislio da je tako, i kod sam upisao na pravom mestu, ali jednostavno nešto ne štima
Ako bazu preimenujem u .accdr ekstenziju, ili program porenem kroz "C:\Program Files\Microsoft Office 2007\Office12\Msaccess.exe" /runtime svič, greške postaju fatalne. Opet ponavljam, u punom Access okruženju, sve fercera bez problema...