update table help

[Delta729]

I have a command button that when clicked changes the value to "In Progress" and adds the current date time to a subform.

Private Sub cmdStart_Click()
Me.Status.Value = "In Progress"
Me.tblTaskTimes_subform!Start = Now()
End Sub

This is working fine now, but I also need to change the "Status" on a table tblProjects. I've been trying to get the doCmd Update to work, but I've been unsuccessful since Friday. I'm a complete novice at VBA, can anyone help me out.
Thanks, even pointing to a good / clear article might help, but I've read several and keep getting it wrong.

DoCmd.RunSQL "UPDATE tblProjects Set Status=InProgress" WHERE ID = Me.Progrect"

[pbaldy]

Try


DoCmd.RunSQL "UPDATE tblProjects Set Status='InProgress' WHERE ID =" Me.Progrect

[Delta729]

Thanks for the reply, it's still giving me a compile error.

Private Sub cmdStart_Click()
Me.Status.Value = "In Progress"
Me.tblTaskTimes_subform!Start = Now()
DoCmd.RunSQL "UPDATE tblProjects Set Status='InProgress' WHERE ID=" Me.Project
End Sub

[pbaldy]

On that line? Is Project the name of the control holding the ID?

[Delta729]

Yes. It's a textbox who's pull in the ID from the tblProject when the form "Task Details" loads and closes the "New Project" form. tblProject is the first table. Each project that is created can have one or more task related to it.

[pbaldy]

Can you post the db here?

[Delta729]

here is a copy

[pbaldy]

Oh shoot, I forgot the &. Try:

DoCmd.RunSQL "UPDATE tblProjects Set Status='InProgress' WHERE ID=" & Me.Project

[Delta729]

That's great. I'm a little lost though, what does the & do near the end?

[pbaldy]

It concatenates the value from the form into the string.