Search results

Many many Many thanks it is working fine. My next step is form loading based on SecurityLevels, i think we need to make if condition to open different forms for different users level. Select Case "SecurityLevel" Case "Admin" 'Full control all buttons & options ON (on...

Thank you for your guidance. i have fixed one step in case sensitivity password is working as per the case sensitivity, but unfortunately username is not what changes i have to do to make username also case sensitive? 'Check case sensitivity of entered username and password is correct...

The problem in this area of code, the code is not even giving response to correct entry i checked with wrong one and write one both the result is same. 'Check case sensitivity of entered username and password is correct 'z123VF&@'. strLoginID = Nz(DLookup("LoginID", "tblUserSecurity"...

Here is my latest code. the area of case sensitivity is still a issue and 3 attempts are also not working now before it was working i dont know what went wrong now. Private Sub BtnLoginOK_Click() Dim vpwd As Variant Static Attempts As Integer Dim SecurityLevel As String Dim strLoginID As...

Thank for everyone. Some what i have reached the half way, the problem is in execution. I have following issue in code. 1. When i login with correct username and password it's still not allowing me to enter in database and still showing "Invalid Login ID and Password" 2. Case sensitivity is...

Thanks for everybody for your help. now the error is shifted to error handling label, i have following full code after you guys inputs, i did put semicolon on label place but not showing the desired result return with compile error "Label is not defined" even i put label its showing the same...

Problem in this line. If DCount("LoginID", "tblUserSecurity", "StrComp(LoginID, '" & Me.txtUsername.Value & "', 0) = 0) > 0 Then

I have put all End if on place. Major issue in 3 portion of case sensitivity code, i dont know what is wrong their. Errors: Syntax error Expected: list separator or)

Hi, I am struct with following code for my login form i have mentioned each code requirement but its not working. Private Sub BtnLoginOK_Click() Dim vpwd As Variant On Error GoTo ErrorHandler: 'Check if username is entered. If IsNull(txtUsername) Or Me.txtUsername = "" Then MsgBox...

As i mentioned before their is two different tables are used in this event. tblVehicleInsurance is used for form Record Source, and having PK in Numeric value which is autonumber. tblVehicle is used to Dlookup vehicle details based on PlateNo which is PK text value. Now PK of tblVehicle is in...

Dlookup code is perfect their is no issues checked it on another form , and its text field sir [PlateNo]

=DLookUp("[Color]","[tblVehicles]","[PlateNo]='" & [cboPlateNo] & "'")

Hi I have following code to do some functionality for save button on form to get records associated with my combo box. Private Sub cboPlateNo_AfterUpdate() Me.Recordset.FindFirst "PlateNo = " & Nz(cboPlateNo, 0) Now the issue is i have to do DLookup for other table based on combo box value...

Hi I am trying query to update my table value field name is [WorkingDays] and [UnpaidLeave] let's go one by one. First and the most important is table name i have tblStaffLeaves on which i need these to be updated. Fields that i am going to use in this event are as follows 1...

Not working error message "Application define or object define error" Their is no subform both forms are individual main form have New button that open the frmAddNewRecords and main form name is frmRecords cboReference is on Main form which is frmRecords. txtReference is on frmAddnewRecords...

Still have problem.... Error message "Microsoft Access can't find the field 'l1' referred to in your expression"

Sorry but not working, Error message for Requery "invalid or unqualified reference" If Not IsNull(txtReference) Then Forms![frmRecords].Form.[frmAddRecords].Form.cboReference .Requery Forms![frmRecords].Form.[frmAddRecords].Form.cboReference.SetFocus End If DoCmd.Close End Sub

Hi I have frmRecords and pop up form frmAddRecords , i want frmAddRecords pop form to pass data to frmRecords for selected fields, frmRecords have all table fields but frmAddrecords have just 4 fields for tblRecords. tblRecords Primary Key is RecordID which is autonumber. frmAddRecords have...

If you had read my first post in this conversation you will have good idea about what is the issue what is versions. Anyways, the issue for example I have tblpassport which holds employees passport details but if any employee's passport have been renewed and certain fields like expiry date...

Can you give me example please? How you going to record versions for employees fields? Which is historic?