<br />
<b>Notice</b>:  Undefined offset: 2 in <b>/home2/icentarb/public_html/icentar/classes/class.permissions.php</b> on line <b>735</b><br />
Private Sub bDisableBypassKey_Click()
On Error GoTo Err_bDisableBypassKey_Click
    
    Dim strInput As String
    Dim strMsg As String
    
    BEEP
    strMsg = "Da li želite ukljuiti Shift Tipku za aplikaciju?" & vbCrLf & vbLf & "Molim unesite programerski password za ovu opciju."
    strInput = InputBox(Prompt:=strMsg, Title:="Ukljui Shift passwordom ili iskljui")
    
    If strInput = "Ovde password" Then
        SetProperties "AllowBypassKey", dbBoolean, True
        BEEP
        MsgBox "Funkcija izvršena." & vbCrLf & vbLf & "Shift Tipka je ukljuena prilikom sljedeeg pokretanja aplikacije.", vbInformation, "Startup ukljuen"
    Else
        BEEP
        SetProperties "AllowBypassKey", dbBoolean, False
        MsgBox "Pogrešno ''Klju'' Password!" & vbCrLf & vbLf & "Shift tipka je iskljuena." & vbCrLf & vbLf & "Shift tipka je iskljuena prilikom sljedeeg pokretanja aplikacije.", vbCritical, "Pogrešan password"
        Exit Sub
    End If
    
Exit_bDisableBypassKey_Click:
    Exit Sub
    
Err_bDisa