Access Esimerkit

Estä raportin avaaminen, mikäli tietoja osoittaakseen

Keskiviikko 20 toukokuu 2009

Voimme estää raportin auki, jos tietoja ei osoittamaan, ja tähän käytämme kaksi eri riippuen versiosta Access:

1 - Kaikki versiot ACCESS
Laita alla oleva koodi ominaisuuksissa raportin tapahtuman oikeuttamislausekkeen "

Käytä tapahtuma mahdollistaminen (Ota käyttöön) raportti:

Private Sub Report_Activate ()

Jos DCount ("*", Me.RecordSource) = 0, niin

MsgBox "Ei Records näyttää" vbDefaultButton1, "Virhe!"

AcReport DoCmd.Close, "raportti nimi"

End If

End Sub

2 - Alkaen version 7 (Access 95) lisättiin tapahtuma ", jos data", voimme urilizar seuraava koodi:

Private Sub Report_NoData (Cancel As Integer)

MsgBox "Ei tietoja raportissa.", VbInformation, "Virhe!"

Cancel = True

End Sub

Jos haluat nähdä käynnissä ladata esimerkin: Estä avaaminen raportti

Posted in Uncategorized | 13 Comments »

Miten estää lomakkeen auki, jos ei kirjaa näyttää?

Lauantai 02 toukokuu 2009

Joskus on tarpeen estää lomakkeen auki, jos on tietoja osoittamaan, esimerkiksi tehtäessä kysely ja rekisteröintiä ei ole tarpeen, meidän ei tarvitse olla avoinna muotoa koska meillä ei ole dataa. Joten meidän täytyy tarkistaa, onko olemassa kirjaa näyttää, ja jos ei ole näyttää viestin ja estää lomakkeen auki. Miten?

On helppoa vain laittaa koodin alla muodossa ominaisuuksien tapauksessa "avaa":

= 0 Then Jos Form.RecordsetClone.RecordCount
MsgBox "Ei löydy.", VbExclamation, "Virhe!"
DoCmd.Close acForm, "löytää tiedot"
Exit Sub
End If

Voit nähdä esimerkki ladata: Estä Form Open

Posted in esimerkeissä , Lomakkeet , Modules | 2 Comments »