copying a record and adding in new text

[will_clarke]

Hi all,
I creating a new database and I’ve hit a wall on one part which somebody may be able to help on.
I have a form which has a specific set of filtered records in it.
Because of the way production works, one record (or job) may need to be broken down or copied- for example

Product 1 – when it is been produced it may need to be produced as product 1a and 1b.

I was trying to put a command button beside the record which would copy the record but also add in some specific text to the comments field in the new record.

It would go something like
FIELD1(Descrip) FIELD2(Qty) FIELD3(Comments)
Product 1 100k
Product 1 100k FRONT --à(‘Front’ would be added in after the button was clicked)

My reason for doing this is I need to create a production schedule for each machine.



Any help or guidance would be greatly appreciated

[SoftwareMatters]

I did something like this recently. Try something like this:

Dim rs as recordset
Set rs = CurrentDb.OpenRecordset("TABLENAME", dbOpenDynaset)
rs.AddNew
If Not IsNull(Me!FIELDNAME_1) Then rs!FIELDNAME_1 = Me!FIELDNAME_1 & "EXTRA TEXT"
rs.Update