B
BLTibbs
win xp - access 2003
I have a form "ReceiveFrm" and a field [itemNote] that is in a continous
form that I need to retain the last entry for the next new record. I have
other fields with text that are using the following code:
Private Sub itemNote_AfterUpdate()
Me!itemNote.DefaultValue = """" & Me!itemNote & """"
End Sub
Private Sub PurchasedFrom_AfterUpdate()
Me!PurchasedFrom.DefaultValue = Me!PurchasedFrom
End Sub
Private Sub scoutsource_AfterUpdate()
Me!ScoutSource.DefaultValue = Me!ScoutSource
End Sub
Private Sub shelf_AfterUpdate()
Me!Shelf.DefaultValue = Me!Shelf
End Sub
'this is true/false checkbox
Private Sub consigned_AfterUpdate()
Me!Consigned.DefaultValue = Me!Consigned
End Sub
Private Sub dateshipped_AfterUpdate()
Me!DateShipped.DefaultValue = """" & Me!DateShipped & """"
End Sub
The only field that isn't working is the itemNote. The only think I can
think is that it is a memo type field and not text or numeric. Can anyone
explain why the memo field itemNote is not retaining the last data entrered?
I have a form "ReceiveFrm" and a field [itemNote] that is in a continous
form that I need to retain the last entry for the next new record. I have
other fields with text that are using the following code:
Private Sub itemNote_AfterUpdate()
Me!itemNote.DefaultValue = """" & Me!itemNote & """"
End Sub
Private Sub PurchasedFrom_AfterUpdate()
Me!PurchasedFrom.DefaultValue = Me!PurchasedFrom
End Sub
Private Sub scoutsource_AfterUpdate()
Me!ScoutSource.DefaultValue = Me!ScoutSource
End Sub
Private Sub shelf_AfterUpdate()
Me!Shelf.DefaultValue = Me!Shelf
End Sub
'this is true/false checkbox
Private Sub consigned_AfterUpdate()
Me!Consigned.DefaultValue = Me!Consigned
End Sub
Private Sub dateshipped_AfterUpdate()
Me!DateShipped.DefaultValue = """" & Me!DateShipped & """"
End Sub
The only field that isn't working is the itemNote. The only think I can
think is that it is a memo type field and not text or numeric. Can anyone
explain why the memo field itemNote is not retaining the last data entrered?