Code for New rec

[Kundan]

Private Sub MoveToMain()
Me.Parent.FNAME = NAME
Me.Parent.LNAME = LNAME
Me.Parent.ADD = ADD
Me.Parent.[ADD 1] = [ADD 1]


Me.Parent.[ADD 2] = [ADD 2]
Me.Parent.PLACE = PLACE
Me.Parent.PIN = PIN
Me.Parent.DISTRICT = DISTRICT
Me.Parent.STATE = STATE
End Sub

I have written the above code to transfer fields from subform to main form. This transfer takes place when I click a field on the subform. But I want to ensure that the transfer is to a new record on the main form. It should not overwrite old records on the main form. How to achieve it?

[pbaldy]

You can use GoToRecord to move the main form to a new record first.

[Kundan]

You can use GoToRecord to move the main form to a new record first.

Should it be,

RunCommand acCmdGoToRecord
Me.Parent.[ADD 1] = [ADD 1]
Me.Parent.[ADD 2] = [ADD 2]
Me.Parent.PLACE = PLACE
Me.Parent.PIN = PIN
Me.Parent.DISTRICT = DISTRICT
Me.Parent.STATE = STATE
End Sub

[June7]

Consider:

DoCmd.GoToRecord acDataForm, Me.Parent, acNewRecord

Why are you duplicating data between main and sub forms?

[Kundan]

Consider:

DoCmd.GoToRecord acDataForm, Me.Parent, acNewRecord

Why are you duplicating data between main and sub forms?

I am not duplicating data. My subform contains addresses already present. If a new record on the main form requires the same address then I need not type it, I will just click on the subform.

[June7]

If you are saving the same address info from one record to another record then that is repetitive data. And if the main form and subform are bound to different tables, that is duplicating between tables as well. If you want to provide db for analysis, follow instructions at bottom of my post.

Do you have a table of Addresses? Just save AddressID to data table.

[Kundan]

If you are saving the same address info from one record to another record then that is repetitive data. And if the main form and subform are bound to different tables, that is duplicating between tables as well. If you want to provide db for analysis, follow instructions at bottom of my post.

Do you have a table of Addresses? Just save AddressID to data table.

Thanks for the advice. GOD BLESS YOU!!! Where can I find tips for designing Accesss Aplications?

[June7]

There are introductory tutorials all over the web. Do a search. Or buy a cheap, used book.

[Kundan]

There are introductory tutorials all over the web. Do a search. Or buy a cheap, used book.

DoCmd.GoToRecord acDataForm, Me.Parent, acNewRecord

This command is giving variable not defined error for acNewRecord

[June7]

Sorry, should be acNewRec. Intellisense popup tips should show you that as you type the code.

[Kundan]

Sorry, should be acNewRec. Intellisense popup tips should show you that as you type the code.

I typed the following command:

DoCmd.GoToRecord acDataForm, Me.Parent, acNewRec


I am getting the following error:

Runtime error ‘2498’:
An expression you entered is the wrong data type for one of the arguments.

[June7]

Okay, I finally did a test instead of relying on memory. This worked for me.

DoCmd.GoToRecord acDataForm, Me.Parent.Name, acNewRec

or instead of Me.Parent.Name, simply: "YourFormNameHere"

[Kundan]

Okay, I finally did a test instead of relying on memory. This worked for me.

DoCmd.GoToRecord acDataForm, Me.Parent.Name, acNewRec

or instead of Me.Parent.Name, simply: "YourFormNameHere"

Thanks a Lot!!! GOD BLESS YOU!!!!!!