Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
No value given for one or more required parameters
Message
Information générale
Forum:
Internet
Catégorie:
Active Server Page
Divers
Thread ID:
01488574
Message ID:
01488578
Vues:
21
>>>hi all,
>>>
>>>hoping someone might be able to help us solve an issue we are left scratching our heads at!
>>>after moving to an alternative webserver we are having the following error when updating an mdb:
>>>
>>>Microsoft JET Database Engine error '80040e10'
>>>
>>>No value given for one or more required parameters.
>>>
>>>/intcouriers/newsite/GlobalBookings/Confirmation.asp, line 221
>>>
>>>the code in question is:
>>>
>>> If (Not MM_abortEdit) Then
>>> ' execute the update
>>> Set MM_editCmd = Server.CreateObject("ADODB.Command")
>>> MM_editCmd.ActiveConnection = MM_editConnection
>>> MM_editCmd.CommandText = MM_UpdateQuery
>>> MM_editCmd.Execute
>>> MM_editCmd.ActiveConnection.Close
>>>
>>> End If
>>>
>>>can anyone see what we could be doing wrong?
>>>
>>>thanks
>>
>>Whats in the strings MM_editConnection and MM_UpdateQuery
>
>
If (CStr(Request("MM_update")) <> "" And CStr(Request("MM_recordId")) <> "") Then
>		
>		  ' create the sql update statement
>		  MM_UpdateQuery = "update " & MM_editTable & " set "
>		  For i = LBound(MM_fields) To UBound(MM_fields) Step 2
>			FormVal = MM_fields(i+1)
>			MM_typeArray = Split(MM_columns(i+1),",")
>			Delim = MM_typeArray(0)
>			If (Delim = "none") Then Delim = ""
>			AltVal = MM_typeArray(1)
>			If (AltVal = "none") Then AltVal = ""
>			EmptyVal = MM_typeArray(2)
>			If (EmptyVal = "none") Then EmptyVal = ""
>			If (FormVal = "") Then
>			  FormVal = EmptyVal
>			Else
>			  If (AltVal <> "") Then
>				FormVal = AltVal
>			  ElseIf (Delim = "'") Then  ' escape quotes
>				FormVal = "'" & Replace(FormVal,"'","''") & "'"
>			  Else
>				FormVal = Delim + FormVal + Delim
>			  End If
>			End If
>			If (i <> LBound(MM_fields)) Then
>			  MM_UpdateQuery = MM_UpdateQuery & ","
>			End If
>			MM_UpdateQuery = MM_UpdateQuery & MM_columns(i) & " = " & FormVal
>		  Next
>		  MM_UpdateQuery = MM_UpdateQuery & ", DateStamp = '" & Now() & "' where " & MM_editColumn & " = " & MM_recordId
And whats in MM_editConnection

and which is line 221 of your asp page.

What can be helpful here is to use response.write to print the connection string or the update string onto the web page.that way you can see exactly what is sent to the server.

Here's a usefullink

http://www.webconcerns.co.uk/asp/accessqueries/accessqueries.asp
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform