auto fill lilnked data

[Gen]

Hi there,

I'm trying to create a contact list DB. I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office. Any ideas on how I could acomplish this? Thanks for your help

 

[Ryan]

There are several ways to do this, so I will give you the way that I do. I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values. I use this in many of my apps and it works great.

 

[a a r o n _ k e m p f]

what is this:

'Please remember to mark this post as answered if this solves your
problem. '

I dont' think that you should be asking for points on usenet, kid

There are several ways to do this, so I will give you the way that I do.  I
would have a form with a list of all of my companys.  Once I selected a
company, there would be a button on that form that was called AddContact. 
Here is the code for the AddContact button.

Private Sub AddContact_Click
  If Me.Dirty Then
  DoCmd.RunCommand acCmdSaveRecord
  End If
  If Not IsNull(Me.CompanyID) Then
  DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
  Else
  MsgBox "You can not add a Contact to a Company without a Company ID."
  End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values.  I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem..

Hi there,

I'm trying to create a contact list DB.  I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.  

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office.  Any ideas on how I could acomplish this?  Thanks for your help

 

[Klatuu]

Your request is not unreasonable, Ryan.
Ignore arron kempf. He is a known, disruptive Troll.

The real reason to request a poster mark the question as answered is so
others searching for answers will see it has been answered and use it as
reference.
--
Dave Hargis, Microsoft Access MVP

Thanks for the advice, however, I think I'll keep my remark, and if an MVP or
other valuable user ask's me to remove it then I may consider. Marking posts
as answered is more then getting points, just so you know.
--
Please remember to mark this post as answered if this solves your problem.

what is this:

'Please remember to mark this post as answered if this solves your
problem. '

I dont' think that you should be asking for points on usenet, kid

There are several ways to do this, so I will give you the way that I do. I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values. I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem..

:
Hi there,

I'm trying to create a contact list DB. I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office. Any ideas on how I could acomplish this? Thanks for your help

 

[Ryan]

Thank you Klatuu, this is the reason for my remark. I left so many of my
questions that were answered even by you marked as unanswered, until someone
left a remark like this in their response. I didnt know to there was an
answer button untill I saw that remark.
--
Please remember to mark this post as answered if this solves your problem.

Your request is not unreasonable, Ryan.
Ignore arron kempf. He is a known, disruptive Troll.

The real reason to request a poster mark the question as answered is so
others searching for answers will see it has been answered and use it as
reference.
--
Dave Hargis, Microsoft Access MVP

Thanks for the advice, however, I think I'll keep my remark, and if an MVP or
other valuable user ask's me to remove it then I may consider. Marking posts
as answered is more then getting points, just so you know.
--
Please remember to mark this post as answered if this solves your problem.

what is this:

'Please remember to mark this post as answered if this solves your
problem. '

I dont' think that you should be asking for points on usenet, kid





There are several ways to do this, so I will give you the way that I do. I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values. I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem..

:
Hi there,

I'm trying to create a contact list DB. I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office. Any ideas on how I could acomplish this? Thanks for your help

 

[Ryan]

Thanks for the advice, however, I think I'll keep my remark, and if an MVP or
other valuable user ask's me to remove it then I may consider. Marking posts
as answered is more then getting points, just so you know.
--
Please remember to mark this post as answered if this solves your problem.

what is this:

'Please remember to mark this post as answered if this solves your
problem. '

I dont' think that you should be asking for points on usenet, kid

There are several ways to do this, so I will give you the way that I do. I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values. I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem..

Hi there,

I'm trying to create a contact list DB. I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office. Any ideas on how I could acomplish this? Thanks for your help

 

[Aaron Kempf knows nothing]

I dont' think that you should be on usenet, kid

There are several ways to do this, so I will give you the way that I do. I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values. I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem..

Hi there,

I'm trying to create a contact list DB. I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office. Any ideas on how I could acomplish this? Thanks for your help

 

[a a r o n _ k e m p f]

I don't see this 'answered' flag.

this is USENET, thank you

Your request is not unreasonable, Ryan.
Ignore arron kempf.  He is a known, disruptive Troll.

The real reason to request a poster mark the question as answered is so
others searching for answers will see it has been answered and use it as
reference.
--
Dave Hargis, Microsoft Access MVP

Thanks for the advice, however, I think I'll keep my remark, and if an MVP or
other valuable user ask's me to remove it then I may consider.  Marking posts
as answered is more then getting points, just so you know.

what is this:
'Please remember to mark this post as answered if this solves your
problem. '
I dont' think that you should be asking for points on usenet, kid
There are several ways to do this, so I will give you the way that I do.  I
would have a form with a list of all of my companys.  Once I selected a
company, there would be a button on that form that was called AddContact.  
Here is the code for the AddContact button.
Private Sub AddContact_Click
  If Me.Dirty Then
  DoCmd.RunCommand acCmdSaveRecord
  End If
  If Not IsNull(Me.CompanyID) Then
  DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
  Else
  MsgBox "You can not add a Contact to a Company without a Company ID."
  End If
Exit Sub
Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]
Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values.  I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem..
:
Hi there,
I'm trying to create a contact list DB.  I have two tables, onewith company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.  
In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office.  Any ideas on how I could acomplish this?  Thanks for your help- Hide quoted text -

- Show quoted text -

 

[Aaron Kempf knows nothing]

I a known, disruptive Troll.

 

[sgmaxmp11]

There are several ways to do this, so I will give you the way that I do.
I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to
retrieve
the values. I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem.

Hi there,

I'm trying to create a contact list DB. I have two tables, one with
company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each
table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company,
but
also allow editing if the individual contact has a different address than
the
head office. Any ideas on how I could acomplish this? Thanks for your
help

 

[Tom Wickerath]

Aaron,

You're won't see these command buttons unless you view this posting using
the web interface:

http://www.microsoft.com/office/com...a2e3e3-ff1f-41f2-aa92-a30f0dacc76c&sloc=en-us

I think you can also see it using Windows Mail in Vista.


Tom Wickerath
Microsoft Access MVP
http://www.accessmvp.com/TWickerath/
http://www.access.qbuilt.com/html/expert_contributors.html
__________________________________________

 

[Please Learn to Read]

Thank you for your interest, but the newsgroup to which you are responding is
a Microsoft-sponsored newsgroup, not part of USENET. The referenced comment
is provided by Microsoft's online interface to remind users to identify
questions that have been answered and use them for reference.

It appears from your response that you are "reading-challenged." Please note
that reading courses for the illiterate are often offered free, or at low
cost, by local welfare and educational agencies.

The 2008 Learn To Read Campaign

what is this:

'Please remember to mark this post as answered if this solves your
problem. '

I dont' think that you should be asking for points on usenet, kid

There are several ways to do this, so I will give you the way that I do. I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values. I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem..

Hi there,

I'm trying to create a contact list DB. I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office. Any ideas on how I could acomplish this? Thanks for your help

 

[Please Learn to Read]

Even Certified Useless Network Trolls (CUNTs), such as you, should know the
difference between USENET newsgroups and Microsoft-sponsored newsgroups.

Google is your friend. Search for the definitions.

And be sure to sign up for a free, or low cost, English language for
illiterates course, at a local welfare or educational organization.

2008 Learn To Read Campaign

I don't see this 'answered' flag.

this is USENET, thank you

Your request is not unreasonable, Ryan.
Ignore arron kempf. He is a known, disruptive Troll.

The real reason to request a poster mark the question as answered is so
others searching for answers will see it has been answered and use it as
reference.
--
Dave Hargis, Microsoft Access MVP

Thanks for the advice, however, I think I'll keep my remark, and if an MVP or
other valuable user ask's me to remove it then I may consider. Marking posts
as answered is more then getting points, just so you know.

"a a r o n _ k e m p f" wrote:

what is this:

'Please remember to mark this post as answered if this solves your
problem. '

I dont' think that you should be asking for points on usenet, kid

There are several ways to do this, so I will give you the way that I do. I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values. I use this in many of my apps and it works great.

:
Hi there,

I'm trying to create a contact list DB. I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office. Any ideas on how I could acomplish this? Thanks for your help- Hide quoted text -

- Show quoted text -

 

[a a r o n _ k e m p f]

it's not part of USENET??

wow.. you don't get it do you?

Thank you for your interest, but the newsgroup to which you are responding is
a Microsoft-sponsored newsgroup, not part of USENET. The referenced comment
is provided by Microsoft's online interface to remind users to identify
questions that have been answered and use them for reference.  

It appears from your response that you are "reading-challenged." Please note
that reading courses for the illiterate are often offered free, or at low
cost, by local welfare and educational agencies.

 The 2008 Learn To Read Campaign

:

what is this:

'Please remember to mark this post as answered if this solves your
problem. '

I dont' think that you should be asking for points on usenet, kid

There are several ways to do this, so I will give you the way that I do.  I
would have a form with a list of all of my companys.  Once I selected a
company, there would be a button on that form that was called AddContact.  
Here is the code for the AddContact button.
Private Sub AddContact_Click
  If Me.Dirty Then
  DoCmd.RunCommand acCmdSaveRecord
  End If
  If Not IsNull(Me.CompanyID) Then
  DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
  Else
  MsgBox "You can not add a Contact to a Company without a Company ID."
  End If
Exit Sub
Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]
Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values.  I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem..
:
Hi there,
I'm trying to create a contact list DB.  I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.  
In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office.  Any ideas on how I could acomplish this?  Thanks for your help- Hide quoted text -

- Show quoted text -

 

[Gen]

Thanks! worked like a charm.

If you could just tell me what the "On Dirty" event means, I can't figure it
out!

There are several ways to do this, so I will give you the way that I do. I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to retrieve
the values. I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your problem.

Hi there,

I'm trying to create a contact list DB. I have two tables, one with company
info linked with a one-to-many relationship to the second with individual
contacts for each company. The tables are linked via CompanyID. Each table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company, but
also allow editing if the individual contact has a different address than the
head office. Any ideas on how I could acomplish this? Thanks for your help

 

[BruceM]

When you begin to create or modify a record the record becomes "dirty".
That is to say there is unsaved data in the record. When you navigate to
another record, close the form, close the database, or use a command to save
the record Access attempts to save the record. When the save is successful,
the data is written to the disk. Before that it exists only in memory, as I
understand it.
The On Dirty event occurs when you first "dirty" the record. I haven't
found much a use for the event, which is not to say there is none, but I
don't know what it may be.

In the code you were given, "If Me.Dirty" means "If the record contains
unsaved data". You could follow that with the code you were given, or you
could do:
If Me.Dirty Then
Me.Dirty = False
End If

or just:
Me.Dirty = False

I think the first example involves a little less processing, but I don't
think it is likely to make a noticeable difference.

In any case, Me.Dirty = False tells Access that the form shouldn't be
"dirty" (contain unsaved data), so Access tries to save the record.

Thanks! worked like a charm.

If you could just tell me what the "On Dirty" event means, I can't figure
it
out!

There are several ways to do this, so I will give you the way that I do.
I
would have a form with a list of all of my companys. Once I selected a
company, there would be a button on that form that was called AddContact.
Here is the code for the AddContact button.

Private Sub AddContact_Click
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If
If Not IsNull(Me.CompanyID) Then
DoCmd.OpenForm "NameOfYourContactsForm", , , , acFormAdd
Else
MsgBox "You can not add a Contact to a Company without a Company ID."
End If
Exit Sub

Then, on your Contacts form, set the default value of the CustomerID to
=[Forms]![NameOfYourCompanyForm]![CompanyID]
The Address fields would all look similar.
=[Forms]![NameOfYourCompanyForm]![CompanyAddress]
=[Forms]![NameOfYourCompanyForm]![City]

Just remember that the Company form needs to be open because the contact
form is getting its information from it and it needs to be open to
retrieve
the values. I use this in many of my apps and it works great.
--
Please remember to mark this post as answered if this solves your
problem.

Hi there,

I'm trying to create a contact list DB. I have two tables, one with
company
info linked with a one-to-many relationship to the second with
individual
contacts for each company. The tables are linked via CompanyID. Each
table
has feilds for address, city, phone number etc.

In the form where I enter new contacts, I'd like the address of each
individual to automatically be the same as the address of the company,
but
also allow editing if the individual contact has a different address
than the
head office. Any ideas on how I could acomplish this? Thanks for your
help