Svojstvo „AllowBypassKey“ („Dozvoli ključ za preskakanje“)

Važno : Ovaj članak je mašinskog prevesti potražite u članku Odricanje odgovornosti. O referencu pronaći verzija ovaj članak ovde na engleskom jeziku.

Svojstvo AllowBypassKey možete da koristite da biste naveli da li je omogućeno da pomoću tastera SHIFT mogu da se zaobiđu svojstva pri pokretanju i makro AutoExec. Na primer, možete da podesite svojstvo AllowBypassKey na False da biste korisnike sprečili da zaobiđu svojstva pri pokretanju i makro AutoExec.

Postavka

Svojstvo AllowBypassKey koristi sledeće postavke.

Postavka

Opis

Tačno

Omogućavanje tastera SHIFT da bi se korisniku dozvolilo da zaobiđe svojstva za pokretanje i makro AutoExec.

Netačno

Sprečava da korisnik tasterom SHIFT zaobiđe svojstva pri pokretanju i makro AutoExec.


Ovo svojstvo možete da podesite pomoću makro ili Visual Basic for Applications (VBA) kôd.

Da biste podesili svojstvo AllowBypassKey pomoću makroa ili Visual Basic for Applications (VBA) kodâ, prvo morate da kreirate svojstvo na sledeći način:

  • Microsoft Access baze podataka (.mdb ili .accdb), možete da dodate svojstvo korišćenjem metoda CreateProperty i da ga zatim uvrstite u kolekciju Svojstva objekta baze podataka .

  • U Microsoft Access projekat (.adp) možete da ga dodate kolekciji AccessObjectProperties u objektu CurrentProject pomoću metode Add.

Primedbe

Da bi trebalo da se uverite da je AllowBypassKey svojstvo postavljeno na vrednost True kada ste otklanjanja grešaka aplikacije.

Postavka svojstva AllowBypassKey stupa na snagu tek prilikom sledećeg otvaranja aplikacije baze podataka.

Primer

Sledeći primer prikazuje proceduru pod imenom SetBypassProperty koji je prošao ime svojstva koje se podešava, tip podataka i postavke. Procedura ChangeProperty pokuša da postavite svojstvo AllowBypassKey i, ako je svojstvo nije pronađena, koristi metoda CreateProperty da biste dodali svojstvo Properkolekcijeveze . Ovo je neophodno jer svojstvo AllowBypassKey ne prikazuje u kolekciju Svojstva dok je dodat.

Sub SetBypassProperty()
Const DB_Boolean As Long = 1
ChangeProperty "AllowBypassKey", DB_Boolean, False
End Sub
Function ChangeProperty(strPropName As String, _
varPropType As Variant, _
varPropValue As Variant) As Integer
Dim dbs As Object, prp As Variant
Const conPropNotFoundError = 3270
Set dbs = CurrentDb
On Error GoTo Change_Err
dbs.Properties(strPropName) = varPropValue
ChangeProperty = True
Change_Bye:
Exit Function
Change_Err:
If Err = conPropNotFoundError Then ' Property not found.
Set prp = dbs.CreateProperty(strPropName, _
varPropType, varPropValue)
dbs.Properties.Append prp
Resume Next
Else
' Unknown error.
ChangeProperty = False
Resume Change_Bye
End If
End Function

Napomena : Odricanje odgovornosti mašinskog prevođenja: ovaj članak je preveden sistem računara bez ljudski interventne. Microsoft nudi ove mašinskog prevoda da pomogne koja nije na engleskom govornih korisnicima da uživate u sadržaju za Microsoft proizvode, usluge i tehnologijama. U članku bio mašinskog prevesti, mogu da sadrže greške u rečnik, sintaksa ili gramatiku.

Unapredite veštine
Istražite obuku
Prvi nabavite nove funkcije
Pridružite se Office Insider korisnicima

Da li su vam ove informacije koristile?

Hvala vam na povratnim informacijama!

Hvala za povratne informacije! Zvuči da će biti od pomoći ako vas povežemo sa našim agentima Office podrške.

×