Search results

Back to an earlier question. Yes I am getting different behavior whether I get to the form via the list form or if I open the form straight from the nav menu. You can also see the difference in the record count box at the bottom of the screen. When I open from Nav I have 40 plus records...

You have already helped a great deal and it is very appreciated. I am thinking if we don't come up with something then it might be time to move to a Delete Query that runs when the form is closed or maybe when the user moves to the next field. Our current approach seems cleaner if we can get it...

Reply to DBguy: open straight from Nav: Opens on the first record in the table in read only mode (by design), can't enter anything into RefNum. there is a button to 'Edit Record' Runs a macro which closes the form and reopens it in Edit Mode. I do that then enter an existing RefNum...

The db is attached. I pulled out a lot of records to make is smaller but there is some left to see function. I understand you all are not Industrial Spies but please keep the data confidential. My test record has been RefNum 106526. In the attached you will see the 'orphan record' which the...

Record Source: TblReports Data Entry: No Form is meant to open in a Read Only Mode. I have a button on the form which reopens it in Edit Mode but all that I have been talking about is when first opened as read only then clicking the built in new record button at the bottom of the window...

OK The form is FrmReportEntry the control source is TblReports. The field is RefNum. The control is CtlRefNum. It is a Short Text field. The actual entries are numerals but I think that doesn't matter. I don't use them to make any calculation. The purpose is an identifier for the...

var type is text. Its actually numerals but don't I don't think that matters. I tried "'" & strRefNum & "'" No errors but still FindRecord doesn't work. The form just sits there blank like it did before I added FindRecord. Only difference is Me.Undo is emptying the entire record. The...

Private Sub CtlRefNum_BeforeUpdate(Cancel As Integer) Dim strRefNum As String strRefNum = Me.CtlRefNum.Text Const MESSAGETEXT = "A record with this value already exists." If Len(Me!CtlRefNum.Text) > 0 Then If Not IsNull(DLookup("RefNum", "TblReports", "RefNum = """ &...

isla: Tried that, works to prevent duplicates just terrifically. Doesn't give desired behavior. You get a message that the record won't be saved after you have entered a bunch of data, too late. Thanks though.

Tried Me.Undo Me!Undo didn't work but Me.Undo has issues maybe similar to when I tried to delete the record? Run-time ero '2142' The FindRecord action requires a find what. Quick google on error 2142 yielded almost nothing. Just the obvious, the 'find what' is missing. So I'm thinking...

Private Sub CtlRefNum_BeforeUpdate(Cancel As Integer) Const MESSAGETEXT = "A record with this value already exists." If Len(Me!CtlRefNum.Text) > 0 Then If Not IsNull(DLookup("RefNum", "TblReports", "RefNum = """ & Me!CtlRefNum.Text & """")) Then MsgBox MESSAGETEXT...

It may take me a while to digest all of that but Thank You very much. I will take a look and see what of it I can understand and let you know if I have questions. Again, Thank You

Hello Access World I am a Quality Engineer at Link Belt, we make Cranes. I am a self taught MS Access and we use some of my work in our department. Not sure self is the best teacher because I often struggle and get stuck but "What don't kill you makes you stronger" so it seems as I come out on...