UPDATE function "too few parameters"

[eww]

Trying to update a table value...

Dim dbCMC As DAO.Database
Dim strSEG As String
Dim lngSum As Long
Set dbCMC = CurrentDb
lngSum = DSum("[DetWgt]", "dbo_tblSubmittals", "[JobNum] = '" & Me.cboJobNum.value & "' And [Segment] = '" & Me.cboSegment.value & "'")
strSEG = "UPDATE dbo_tblSegments " & _
"SET [DetWgt] = " & lngSum & " " & _
"WHERE [JobNum] = '" & Me.cboJobNum.value & "' And [Segment] = '" & Me.cboSegment.value & "'"
dbCMC.Execute strSEG, dbFailOnError

It's Erroring on the Execute and saying "too few paramters. Expecting 1". I can't figure out where the problem is, did I forget anything?

[pbaldy]

Add this line right before the Execute:

Debug.Print strSEG

That will print the finished SQL out to the VBA Immediate window. If you don't spot the problem, post the SQL here, along with the data types of the fields.

[eww]

Already ahead of you, but I didn't notice any problems. Here's the printout

UPDATE dbo_tblSegments SET [DetWgt] = 250000 WHERE [JobNum] = '1123705000' And [Segment] = 'Foundation'

DetWgt is decimal, JobNum and Segment are text

[pbaldy]

I've seen that error when something was spelled wrong too. Double check the spelling of the table and field names. Is that an underscore in the table name, or could it be a space? I suspect that's right, as that's how a SQL Server linked table gets named by default. I always drop the "dbo_" from the linked table, but that's me. If you paste that SQL into an new query and try to run it you might get a more descriptive error.

[eww]

Paul, I need your direct line, because you always know how to solve my database problems

pasted the SQL into a new query like you suggested and it instantly told me that the wrong parameter was "Segment" which is actually "Segments" in that table. duh. Thanks for the help.

[pbaldy]

Happy to help!