Access error 0x80040E14

Hi,

I'm tearing my hair out I have a ASP that inserts the values into a database, but upon submitting I get this error:

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] Number of query values and destination fields are not the same.

<%
' *** Insert Record: set variables

If (CStr(Request("MM_insert")) = "form1") Then

MM_editConnection = MM_login_STRING
MM_editTable = "quotes"
MM_editRedirectUrl = "confirm.asp"
MM_fieldsStr = "nopp|value|opp|value|outlets|value|cableqty|value|buildtype|value|workinghours|value|cabqty|value|no pp|value|des1|value|cost1|value|des2|value|cost2|value|des3|value|cost3|value|des4|value|cost4|value |des5|value|cost5|value|des6|value|cost6|value|des7|value|cost7|value|des8|value|cost8|value|matsub| value|des9|value|cost9|value|des10|value|cost10|value|des11|value|cost11|value|des12|value|cost12|va lue|des13|value|cost13|value|des14|value|cost14|value|des15|value|cost15|value|labsub|value|mancost| value|username|value|totcost|value"
MM_columnsStr = "nopp|none,none,NULL|opp|none,none,NULL|outlets|none,none,NULL|cableqty|none,none,NULL|buildtype|',no ne,''|workinghours|',none,''|cabqty|none,none,NULL|nopp|none,none,NULL|des1|',none,''|cost1|none,non e,NULL|des2|',none,''|cost2|none,none,NULL|des3|',none,''|cost3|none,none,NULL|des4|',none,''|cost4| none,none,NULL|des5|',none,''|cost5|none,none,NULL|des6|',none,''|cost6|none,none,NULL|des7|',none,' '|cost7|none,none,NULL|des8|',none,''|cost8|none,none,NULL|matsub|none,none,NULL|des9|',none,''|cost 9|none,none,NULL|des10|',none,''|cost10|none,none,NULL|des11|',none,''|cost11|none,none,NULL|des12|' ,none,''|cost12|none,none,NULL|des13|',none,''|cost13|none,none,NULL|des14|',none,''|cost14|none,non e,NULL|des15|',none,''|cost15|none,none,NULL|labsub|none,none,NULL|mancost|none,none,NULL|username|' ,none,''|totcost|none,none,NULL"

' create the MM_fields and MM_columns arrays
MM_fields = Split(MM_fieldsStr, "|")
MM_columns = Split(MM_columnsStr, "|")

' set the form values
For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i)))
Next

' append the query string to the redirect URL
If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
End If
End If

End If
%>

I checked my Access DB and all looks fine - can someone please help.

Regards,

Sanjay

What we really need is the confirm.asp page, as this page only builds the query string for THAT page to use. The split functions used in this page DO correctly split your strings into equal variant arrays of 86 items each.