Recent content by KSReynolds

I inherited a database and am trying to view the code that is behind the buttons on the MainForm. No luck, even when I open the database directly, from the mdb bypassing the mdw attached to it. Next, I tried to create a new database and suck the contents in. Get a message that I don't have...

This is what I came up with and it seems to work. Dim LOGON As String LOGON = DLookup("logonname", "tbllogonname") If (Not IsNull(Me.NEXT_S_DAT)) Then If LOGON <> "dzura" Then If LOGON <> "weglhaut" Then Me.AllowEdits = False Else Me.AllowEdits = True End If End If End If

I put the code in my format, and for some reason, the code is executing the me.allowedits = false line. It is not evaluating the expression correctly. It should be bypassing the me.allowedits = false statement. HELP! Dim logon As String logon = DLookup("logonname", "tbllogonname") If (Not...

I thought I already posted this, but I don't see it. Is there a more elegant way to write this code? I would rather not use two IF statements. If (Not IsNull(Me.CLOS_DATE) And DLookup("logonname", "tbllogonname") <> "azura") Then Me.AllowEdits = False End If If (Not IsNull(Me.CLOS_DATE) And...

That was really easy!

I have several forms in my database that have a closed (1=Closed) option button. Is there a way to make all of the fields for that record readonly if the closed option is set to equal 1?

I didn't want to have to make an individual selection form for each report. This passes the name of the report to the Select Date form and then opens up that report name that has been passed to it.

I figured it out. I made the data selection form with an invisible text box to house the name of the report. When the Select Date form is activated, I have the value of the report name written to that text box. Then when the end date is entered, I have the vba code open up that report name in...

I was hoping that I wouldn't have to take that route because I will have to create individual forms for all of my reports that use date criteria.

I have a date value in my query that controls the Reports output. In the date field, I have entered Between [Enter Start Date] and [Enter End Date]. When the user is prompted for the date, there are no formatting options applied to the prompt, so the user has to enter in the "/" characters...

I would think that you have to put the > [Enter End Date] criteria on the date field in the query that controls the report, not the unbound field. If it is unbound, how will it know how to filter the records?

Is there a way, using this method, to have the input boxes that are generated by the parameter put in the / / for the date input?

That works better.

Re: Hope this is the correct place to ask Try: If isnull(Me.txtDate) Then

But my users are going to be running the application as an .mdb file. Now they told me they are bringing on Access 2013 machines to the mix. What do you get running an .mdb on Windows 2010?