Microsoft JET Database Engine error '80040e10'
No value given for one or more required parameters.

/registrationform.asp, line 54



<%
' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "" Then
MM_dupKeyRedirect="registration_failed.asp"
MM_rsKeyConnection=MM_connregisform_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("regisEmail")
MM_dupKeySQL="SELECT regisEmail FROM PresentersInformationTable WHERE regisEmail='" & Replace(MM_dupKeyUsernameValue,"'","''" & "'"
MM_adodbRecordset="ADODB.Recordset"
set MM_rsKey=Server.CreateObject(MM_adodbRecordset)
MM_rsKey.ActiveConnection=MM_rsKeyConnection
MM_rsKey.Source=MM_dupKeySQL
MM_rsKey.CursorType=0
MM_rsKey.CursorLocation=2
MM_rsKey.LockType=3
MM_rsKey.Open <--------------- LINE 54
If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
' the username was found - can not add the requested username
MM_qsChar = "?"
If (InStr(1,MM_dupKeyRedirect,"?" >= 1) Then MM_qsChar = "&"
MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue
Response.Redirect(MM_dupKeyRedirect)
End If
MM_rsKey.Close
End If
%>