Run-time '3051' - Too few parameters. Expected 1

[jgelpi16]

I keep getting this error message when I try to execute the below SQL. I have been over this time and time again to no avail. Any help will be much appreciated.

    mySQL = "UPDATE tblExportExcel SET [EmployeeName] = '" & strEmplName & "', [CurrStatus] = '" & strCurrStatus & "'," & _
        "[CurrPosition] = '" & strCurrPosition & "', [CurrLocation] = '" & strCurrLocation & "', [SelBeginDate] = #" & dtSelBeginDate & "#," & _
        "[SelEndDate] = #" & dtSelEndDate & "#, [HSLCExcptPct] = " & dblHSLCExceptPct & ", [HSLCNumExceptions] = " & lngHSLCNumExceptions & "," & _
        "[HSLCAvgHrs] = " & dblHSLCAvgHrs & ", [HSLCLastException] = #" & dtHSLCLastExcept & "#, [HSLCCity] = '" & strHSLCCity & "'," & _
        "[HSLCState] = '" & strHSLCState & "', [HSLCRegion] = " & lngHSLCRegion & ", [HSLCDistrict] = " & lngHSLCDistrict & "," & _
        "[HSLCDistrictManager] = '" & strHSLCDistrictMgr & "', [HSLCPhone] = '" & strHSLCDistPhone & "'" & _
        "WHERE [EmployeeID] = " & lngEmplID & ";"
    CurrentDb.Execute mySQL

[kennejd]

I don't think you need all those ' and # qualifiers in your query since you're not testing for a condition. Take those out and see what happens.

[ajetrumpet]

how about this, bud:

"UPDATE tblExportExcel SET [EmployeeName] = '" & strEmplName & "', 

[CurrStatus] = '" & strCurrStatus & "', 

        [CurrPosition] = '" & strCurrPosition & "', [CurrLocation] = '" & 

strCurrLocation & "', [SelBeginDate] = #" & dtSelBeginDate & "#, 

        [SelEndDate] = #" & dtSelEndDate & "#, [HSLCExcptPct] = " & 

dblHSLCExceptPct & ", [HSLCNumExceptions] = " & lngHSLCNumExceptions & ", 

        [HSLCAvgHrs] = " & dblHSLCAvgHrs & ", [HSLCLastException] = #" & 

dtHSLCLastExcept & "#, [HSLCCity] = '" & strHSLCCity & "', 

        [HSLCState] = '" & strHSLCState & "', [HSLCRegion] = " & 

lngHSLCRegion & ", [HSLCDistrict] = " & lngHSLCDistrict & ", 

        [HSLCDistrictManager] = '" & strHSLCDistrictMgr & "', [HSLCPhone] = '" 

& strHSLCDistPhone & "' 

        WHERE [EmployeeID] = " & lngEmplID & ";"

[/QUOTE]

does it work?? if it doesn't sir, print it out and look at the result. such as:

mySQL = statement

debug.print mySQL

did you remember to do that first?? Check your quote usage too. For instance, REGION is being treated like a number. are you sure that's right?? if that particular portion is a string, it'll error.

[jgelpi16]

After some painstaking reviews and a couple colleagues looking at it.....I had mis-referenced one of my fields. Should have been [CurrLocationID] not [CurrLocation]. Thanks so much for your help!