Search and update with a combo box

  • Thread starter Thread starter JIM
  • Start date Start date
J

JIM

I need help with a simple search and update using a combo box. In using
Allen Browne's example I've customized using the following:
Private Sub cboWONo2_AfterUpdate()
Dim rst As DAO.Recordset
If Not IsNull(Me.cboWONo2) Then
If Me.Dirty Then 'Save before move
Me.Dirty = False
End If
Set rst = Me.RecordsetClone 'Search in record
clone set
rst.FindFirst "[WONo] = " & Me.cboWONo
If rst.NoMatch Then
MsgBox "Work Order Not Found"
Else
Me.Bookmark = rst.Bookmark
Me.chkClosed = Me.cboWONo2.Column(2)
Me.txtNotes = Me.cboWONo2.Column(3)
End If
Set rst = Nothing
End If
End Sub
My question: txtNotes is a memo field and so is what is in
cboWONo2.Column(3). When I try to run this Access will bomb and say it needs
to close. How can I get a memo field to show and also how do I update these
values in the table? I tried:
!Closed = Me.cboWONo2.Column(2)
!Notes = Me.cboWONo2.Column(3)
.Update
Similar to something I've done in the past but the compiler stopped on
!Closed with message "Invalid or unqualified reference"
Tia
 
I have it working perfect. The memo field is working now and I discovered I
didn't even need to assign the update fields programatically -just enter on
form and it's updated in the table. Wow! Thanks
 
Back
Top