What is wrong with this snippet?

[hughed00]

Private Sub Text57_Click()
Dim rst As DAO.Recordset

Set rst = CurrentDb.OpenRecordset("AssignedNumber", dbOpenDynaset)

Text57.Value = rst!AssignedNumber
rst!AssignedNumber = rst!AssignedNumber - 1

Set rst = Nothing

End Sub

*/ This bit is supposed to fill a field on a form with the value of a table which is a piece of a composit number. It then decrements the field for the next time we use the form to create a new composit number.

The debugger doesn't like the decrementing line/*

 

[pmanivas]

AssignedNumber is a table name or fieldname?

 

[hughed00]

In this case both, although there is no reason why it has to be.

ean13.AssignedNumber.AssignedNumber

db.tbl.fld

 

[tlbroadbent]

Before assigning a new values to a record set, you need to execute the Edit method. Then you'll need to execute the Update method to actually store the value on the table.

rst.edit
rst!AssignedNumber = rst!AssignedNumber - 1
rst.update Terry L. Broadbent
FAQ183-874 contains tips for posting questions in these forums.
NOTE: Reference to the FAQ is not directed at any individual.

 

[hughed00]

Will give it a go after the meeting I should be paying attention to is over....