Search results

Hi everyone, I need some help with this problem. I've got two date fields - DateSent and DateTstReslt I have a field on the form that stores the no of weeks between the two dates. If there is no entry for 'DateTstReslt' then today's date is used. What I would like to do is to ensure is that...

Problem Solved Hi Gemma, Thanks so much for your help. It working now. The problem of the option not accepting the tick was that the data type of the field Examdoneyn was set as Yes/No instead of a number. I also changed the after update event of the frame and it also works beautifully...

Hi gemma, Thanks for responding. First of all, the text box is outside of the frame, and this is the code that i have in the after update event ********* Private Sub Frame44_AfterUpdate() If Me![ExamDoneYN] = 2 Then Me.ReasonNoExam.Enabled = True...

Hi everyone, I'm working on a form to accept patient's medical info. One of the question on the form is 'whether an examination was done (Yes/No), if no, then a reason has to be entered why the examination was not done. The field - ExamDoneYN is of data type YES/NO. I created an option group...

Thanks a Mill. Hi Paul, Thanks so much for the help. I'll try it and give you a feedback.. Once again, many thanks.. Appreciated, Will

Paul, I'm sure that some users may choose to 'jump around' the form, but what I'm trying to do is when or if they do select 'Other', I want to ensure that some value is entered in the text box that is enabled. In other words, you can't (shouldn't) have 'Other' selected and this text box remain...

Thanks Paul.. I used the following code, which works just fine.. '--------------------------------- Private Sub MHOther_Click() If Me![MHOther] = True Then Me.MHOthSpecify.Enabled = True Forms!CSMainfrm!MHOthSpecify.SetFocus Else...

Hi everyone, I've got some check boxes on a form which includes one for 'Other'. Whenever the 'Other' check box is checked (selected) I want to display a text box in which the user can specify what 'Other' means. This works fine with the following code:- '**** Private Sub MHOther_Click()...

Hi everyone, I have four tables (all linked by a unique identifier) which I populate via data entry forms. I would like to give the user an option of making changes to the data by entering the unique identifier and displaying the specific record (from all four tables). Is there any way to...

Hi Rich, I tried your suggestion and it worked beautifully.. Thanks so much. Missingling,Bob : I changed the Err# to 2501, but it still didn't work. The situation is that I have a command button which links to a form which is based on a query. When I click on the button, the query requests a...

Thanks, I'll go try it now Will

Hi Jklo, I tried the following, but I'm still getting the message being displayed. Private Sub Form_Open(Cancel As Integer) On Error GoTo Form_Open_Error If Me.RecordsetClone.RecordCount = 0 Then MsgBox "Sorry!!! No Matching Record found!" Cancel = True End If Form_Open_Exit...

Hi everyone, I have placed the following Code in the OnOpen event of a form to check if any records exists. If there are no records, then a message is displayed. Private Sub Form_Open(Cancel As Integer) DoCmd.SetWarnings False If Me.RecordsetClone.RecordCount = 0 Then MsgBox "Sorry!!! No...

Hi Everyone, Here's the situation:- I have a patient record with a specific consultant assigned to the patient. In some instances, the patient may request a different consultant. What I want to do is to allow the user to change the consultant and to save details about the change e.g. file no...

Hi everyone, I know that this is supposed to be a simple task, but my brain has fallen asleep on me. I've created a combo box on a data entry form based on a table with 2 column (code,desc) On the form, the desc is displayed but the code is stored in the underlying table. When displaying the...

Hi Banana, Thanks for the advice and the link. Did you look at the Db that I attached? I have placed the following code in the AfterUpdate and KeyPress property of the field Patworkphone which is in the frmpaddr form. Me!frmtaddr.Form!Taddr1.SetFocus The code is supposed to set the...

Hi Banana, Do you mean leave off the reference to the main form? like this Forms!frmtaddr.Form.Taddr1.SetFocus I tried that and it didn't work... Thanks Will

Hi Bob, Thanks so much for replying to my post. I tried your suggestion but it's still not working. The cursor keeps moving from field to field within the form 'frmpaddr' Here's the code:- Private Sub PatWorkPh_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case 9, 13...

Hi Gary, Is there a prob. with the zip file?? There are 6 separate tables linked by the patient file no. Thanks Will

Hi everyone, I'm working on developing a patient registration system which consists of 6 tables linked by a patient file number. The data entry form has a main form and 5 subforms. I got no problems moving from the main form to the first subform (frmpaddr), but I'm having some difficulty in...