Search results

I am trying to set a record source to view only one record. For example: When a user logs in I want the form to only show that users record. I have the following on the log in form which is called UserAccess. DoCmd.Close acForm, "UserAccess", acSaveNo DoCmd.OpenForm...

Thanks once again Bob!!:)

On my switchboard form i have a listbox with various employees. When the user clicks his name on the listbox then hits the view my hours button a user access form pops up (basically a login screen). what i'm trying to do is, whatever name the user clicked on the listbox on the switchboard to...

Thanks everybody. Both of the samples got it done.

Dim DB As Database Dim RS As Recordset Set DB = CurrentDb Set RS = DB.OpenRecordset("Employees") With RS If .AbsolutePosition = .RecordCount - 1 Then Me.ButtonPreviousRecord.Enabled = False End If End With RS.Close Set...

Pbaldy : I set my RS and took the second IF out and now is giving me an error message that Operation is not supported for this type of object. I pressed Ctrl Break and It went to the Me.ButtonPreviousRecord.Enabled = False. Any idea??

What am I doing wrong or is there another way to go about this? I have control buttons instead of navigation buttons on my form to go to previous and next records. I did not use the wizard just VBA code. So what I am trying to now do is make the ButtonPreviousRecord disabled when its on last...

Wow...so simple. Lol . Thanks Bob!

In my Employees table i have a Yes/No field named [Active]. I'm trying to make a ComboBox that allows you to select view Active, Inactive, or All employees. How do I do the All part,? Active: Me.RecordSource = "SELECT * FROM Employees WHERE [Active]= True" Inactive: Me.RecordSource =...

Thank You!

Private Sub MyZipCode_KeyPress (KeyAscii As Integer) If KeyAscii >= vbKeyA And KeyAscii <= vbKeyZ Then KeyAscii = 0 End If End Sub This only works for upper case letters. How can I make it case insensitive?? Thanks in advance.

This is my function: Function PunchInOrOut(sMyCallingForm As String, MyPunchInOrOut As String, MyUserCodeAs String, MyUsername As String, MyPunchDate As Date, MyPunchTime As Date, ForFutureUse1$, ForFutureUse2$, ForFutureUse3$) On Error GoTo MyErrorControl Dim DB As DAO.Database, MyPunchID...

YES! I finally got it to work. Just a few stuff here and there and I'm done with my first project. Thank you so much!!

bob - i did that and it worked, but nothing shows. My data doesn't show in the textboxes.

I put the code on the Form_Load.

I don't know...as soon as i click Form View the message pops up and it won't let me see Form View it just goes back to design view. I think in the query though because it doen't show me debug.

Is giving me an error message...This expression is typed incorrectly, or is too complex to be evaluated. For example, a numeric expression may contain too many complicated elements. Try simplifying the expression by assinging parts of the expression to variables. I was reading about this and...

I'm filtering a form.... I'm trying to do a TimeClock Database. So the form that I'm working on now is for the administrator so he can look each employee's hours. So the form has the following properties Record Source: SELECT Punches.DateOfWork AS MyDateOfWork, Punches.TimeIn AS MyTimeIn...

I forgot to put the the names in the Query...But anyways the combobox doesn't work. It doesn't even show the value list.

ahahah....I think I know matter of fact