updating a table from a form.....

[softspoken]

I created a database, split the database, put the front end on multiple users pc's, and now I have an issue.



The issue is : I have a few fields that are drop down boxes so that they can pick something from the list. There will be times when they will have to key in something because it was not in the drop down box.

Is there a way to add what was keyed in the form manually , automatically to the table that houses the drop down information?

I hope that is clear enough....

(Access 2003)

[pbaldy]

Sure; search here on "notinlist". The Not In List event of the combo is commonly used to add new items.

[softspoken]

Sure; search here on "notinlist". The Not In List event of the combo is commonly used to add new items.

I have looked at a few different examples of the not in list but I dont understand what I need to do fully. I am a novice user.

Could you help me to get this working. The table that I have linked to the combo box is called "Summary of App Err" could you help me to write the code that would work for me?

Thanks,

[pbaldy]

Well, in your searching, presumably you saw two basic techniques. One adds the value in the combo directly into the table. The other opens a second form up, for times when there are other related values that have to be added (like if I'm adding a new customer number, I have to enter all the customer's info). Which did you need?

[softspoken]

Adds the value from the combo directly in to the table

[pbaldy]

I linked to a couple of single item methods here:

https://www.accessforums.net/access/...able-5199.html

[softspoken]

Thank you for the links but I am definitely a novice user and its hard for me to read that and relate what the names of my tables are vs anyone elses and what would go where. If you dont have the time to actually help me create my on "Not in list" code I understand. Sorry for not being much help.

[softspoken]

Just for people reading this is what I found and it worked perfectly for my needs. Thanks for all your time and efforts. Its much appreciated.

Dim rst As Object, txtName As String

On Error GoTo errorcatch

txtName = MsgBox("Add '" & NewData & "' to the list of Clients?", _
vbQuestion + vbYesNo)
If txtName = vbYes Then
' Add data stored in NewData argument to the Summary of App Err table.
Set rst = CurrentDb.OpenRecordset("Summary of App Err")
rst.AddNew
rst!FieldName = NewData
rst.Update
Response = acDataErrAdded ' Requery the combo box list.
Else
Response = acDataErrDisplay ' Require the user to select
End If
rst.Close
Set rst = Nothing
Exit Sub
errorcatch:
MsgBox Err.Description