Search results

  1. M

    **browse button**

    I have a browse button to open up files with the following function on the click event. When I click it it gives me an error message saying - Object doesn't support this property or method. I did a debug and it gives me the error after the red line. Does anybody have any idea what I'm doing...
  2. M

    **ComboBox Values**

    If Me![ComboBox].Column(0) = "Employee1" Then Me![Button].Enabled = False Else Me![Button].Enabled = True End If
  3. M

    **ComboBox Values**

    That hides the button when either employee is selected.
  4. M

    **ComboBox Values**

    I have a ComboBox with a ValueList ("Employee1";"Employee2") and Button1 How do you disable Button1 only when Employee1 is selected from the ComboBox??
  5. M

    **navigation buttons**

    TxtRecordNumber: ControlSource = CurrentRecord TxtRecordCount: ControlSource = Count(*) Private Sub ButtonNextRecord_Click() On Error GoTo MyErrorControl If Me.CurrentRecord = Me.Count Then Me![ButtonLastRecord].Enabled = False Me![ButtonPreviousRecord].SetFocus...
  6. M

    ** form properties **

    I have a really quick question that has to to with the topic (form properties)... How do I call an event from another event on the same form? Private Sub UserPasswordConfirmation_KeyDown(KeyCode As Integer, Shift As Integer) On Error GoTo MyErrorControl If KeyCode = vbKeyReturn Then...
  7. M

    ** form properties **

    I did it on the Load Event on Form2 then when i click edit or new i disable them before i run the command. Everything works now. Thanks to all.
  8. M

    ** form properties **

    Thanks. It works, but does this effect other commands? On my ButtonNew (button user clicks to add new record) I have DoCmd.GoToRecord , , acNewRec But when I run it, an error message pops up telling me I can't go to that record. Other words, I can't create new record. Is it because I disabled...
  9. M

    ** form properties **

    I want to change FORM2 properties from when you click a button in FORM1 so you can't edit, delete, or change anything until you click the Edit button. What am I doing wrong? Private Sub ButtonCompany_Click() On Error GoTo MyErrorControl DoCmd.OpenForm "MyCompanyInfo"...
  10. M

    ** tab key **

    IT SURE WORKS!! THANKS BOB Private Sub CompanyName_KeyDown(KeyCode As Integer, Shift As Integer) On Error GoTo MyErrorControl If KeyCode = 9 And Len(Me![CompanyName] & vbNullString) = 0 Then KeyCode = 0 MsgBox "Please enter a company name", vbExclamation, "Required Data"...
  11. M

    ** tab key **

    I tired putting Len(Me!CompanyName & vbNullString) = 0 and also turned on the Key Preview property but it's still letting me press Tab without typing anything.
  12. M

    ** tab key **

    The user can't press tab until he types something into the textbox..how do I do this?? This is what i have.. Private Sub CompanyName_KeyPress(KeyAscii As Integer) On Error GoTo MyErrorControl If KeyCode = 9 and Me![CompanyName].Value = "" Then KeyCode = 0 msgbox "Please enter a...
  13. M

    **tab control**

    wow:o..Thanks!
  14. M

    **tab control**

    When my program starts it makes you create an admin account to continue on. Once created, it takes you a form to create users. In this form i have a tab control called MyTabs and it has 3 tabs (tab1, tab2, tab3). Tab 1 is to create users. I want to disable tab 2 and 3 until at least one user...
  15. M

    **verify password**

    Exactly what i needed. Thanks again Bob, you're always saving me!!
  16. M

    **verify password**

    How do I make sure two passwords are exactly the same?? I have two fields: MyPassword and MyPassword2. In order to create and save your password they have to match. But it's letting me save even tho MyPassword is Admin and Password2 is admin?? How do i make it case sensitive??
  17. M

    **RecordSource**

    Ok. I made the table and the relationship. But now is giving me this error message saying Too Few Parameters. Expected 1...???? THis is the code: Private Sub Form_Open(Cancel As Integer) On Error GoTo MyErrorControl 'If the user that signed in has employee access do this If...
  18. M

    **RecordSource**

    so i have to make a new table with what? All the employees and their AccessOption?? But what happens when u create a new employee .. how do i add it to both tables? wouldn't that just be adding the same info in two tables??
  19. M

    **RecordSource**

    I didn't understand how to do it that way. I tried this but it gives me a few errors like undefined funciton Employees.AccessOption.Column in expression...Too few parameters. Expected 1. .... and object variable or with block variable not set...Can someone let me know whats wrong please.....What...
  20. M

    **RecordSource**

    No, this record source is only going to be for the employee who signed in. I was switching it up until it worked. It's working but when the EmployeeInfo loads it gives me like a little message box with the title "Enter Parameter Value" Then the message is UserAccess.Username then it give me a...
Top Bottom