How to limit subform to have only 1 entry?

[KALIDA]

Hello to all,
I am new to this forum. In my project I have created a subform "frm_Obs1" on main form "frm_Main". I want to write code for following condition.
1. If there is no records, I want the other user to be able to add one.
2. If there all ready is one, I want the user to be able to change it, but not add anymore. I tried various method but none of them worked out. Can anyone How to limit subform to have only 1 entry? please help me.

[absolute55]

Hi I have just written following code for doing all things that you are want to do. Just try to run following code from the Current() Event of the Main Form but keep it mind that you have to duplicate it in the Current() Event of the Sub-Form. After using this code try to run hole program and check whether you are able to add only one record or not.

    Private Sub Form_Current()
   With Me![frm_Obs1].Form
      If .Recordset.RecordCount = 0 Then
        .AllowAddition = True
     Else
      .AllowAddition = False
       .AllowEdit = True
      End If
 End With
  End Sub

[Reegan]

There is another way to limit subform to have only 1 entry. First make sure that record of subform is inserted when the record of main form is inserted. It is for no hassle after wards with "Allowadditions" class. Because by doing this we will ensure that every record is there. You can also use default field like "<Enter new data>" to show the user that this field is not filled yet.

[opaper]

Hey it is very easy process. You there is no need to use 1:1 ratio for solving above program. You have to use 1:?, where ? -> 0 or 1 code to solve above program. There is no need to have record association with any field. Make sure that record will not be exceed than single record. Just try above code in your suForm and try to run program.

[Modifier]

You have to create separate table with built on a 1:1 basis for storing such items as fit within a particular area. Just create separate 1:1 table to store above information without losing anything with regarding to normalization. After this make proper connection in your computer and then try to run that code and test whether you get the same problem or not.