Taking data from form and placing into table

[johnbongrovey]

I have a form that I am inputting data into. I have been able to Clear the form. I have created an edit script and it brings the data from the table to populate the form. When I try to change the data in the form and run a VBA update to push the data down to the table I am having no luck. I can add/Delete recordswith no problems but I can't edit them and put them back in the table. I am novice and just learning the formats and scripting.

 

[pbaldy]

Hard to say what you're doing wrong without seeing the code.

If you're using code to handle the data, you're doing it the hard way. Some thoughts here:

http://www.baldyweb.com/BoundUnbound.htm

 

[johnbongrovey]

I am taking the tblvehicle and trying to take the variable's from the form and put into the table.
Private Sub Update_Click()
CurrentDb.Execute "update tblVehicle " & _
" set Me.txtUnitNum =" & UnitNumber & _
", Department ='" & Me.cboDepartment & "'" & _
", VehicleType ='" & Me.cboVehicleType & " '" & _
"Where UnitNumber =" & Me.UnitNumber.Tag
'clear Form
cmdClear_Click
'refresh data in list on form
frmVehicleSub.Form.Requery
End Sub

 

[pbaldy]

You can use this to see how the finished SQL looks.

http://www.baldyweb.com/ImmediateWindow.htm

Offhand, you may have an issue with spaces, and do you really want the tag property? I'd expel the value property.

 

[johnbongrovey]

The only thing that I really want to do is to take a record in a table and update the data from the form data that I put in. I am struggling with something that I would think would be simple. I am using Unbound fields in my form and I have a primary key in my table. I would like to select the record in the table and put the data from the form into that selected record.

 

[pbaldy]

Like I said, using unbound form is more difficult, but that said your methodology is fine, you just have to find the error in the SQL.

 

[johnbongrovey]

Thanks Paul I found the issue with my "Where statement"
Changed from:
"Where UnitNumber =" & Me.UnitNumber.Tag
Changed to:
WHERE UnitNumber =" & Me.txtUnitNum.Tag
I was using the UnitNumber on both ends of the statement
Thanks again for your assistance with this issue

 

[pbaldy]

Happy to help. Still confused by using the Tag property, but as long as it's working.