|
| |
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
View related threads:
(in this forum
| in all forums)
|
Logged in as: Guest
|
|
|
umponcel
Posts: 9 Joined: 11/11/2004 From: Saint-Sauveur, QC, Canada Status: offline
|
Microsoft OLE DB Provider for ODBC Drivers error '80040... - 11/12/2004 19:40:36
Hi every one, Today, something new and I'm wondering if anyone has come across this error , and if they have a quick solution for it. Thanks in advance for helping, This is the error that ASP returns me Microsoft OLE DB Provider for ODBC Drivers error '80040e10' [Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 32. /forms/fr/corporative.asp, line 60 (search for ---> to see line 60 in my script example.) '========================================================
Dim strCON ' strCON = Connection string to database.
Dim rsADD ' rsADD = The recordset for the new record to be added.
Dim adoCon ' adoCon = The database connection object.
Dim strSQL ' strSQL = The query string to be used.
strCON = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\fpdb\guestbook.mdb")
Set adoCon = Server.CreateObject("ADODB.Connection")
adoCon.Open strCON
Set rsADD = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT tblGenerale.prefixName, tblGenerale.firstName, tblGenerale.lastName, tblGenerale.email, tblGenerale.company, tblGenerale.fonction, tblGenerale.address, tblGenerale.city, tblGenerale.country, tblGenerale.province, tblGenerale.provinceOther, tblGenerale.postalCode, tblGenerale.phoneNum, tblGenerale.faxNum, tblGenerale.dateFrom, tblGenerale.hourIn, tblGenerale.minuteIn, tblGenerale.dateTo, tblGenerale.hourOut, tblGenerale.minuteOut, tblGenerale.nbNights, tblGenerale.nbPersons, tblGenerale.nbRooms, tblGenerale.evenementType1, tblGenerale.evenementType2, tblGenerale.evenementType3, tblGenerale.evenementType4, tblGenerale.evenementType5, tblGenerale.evenementTypeOther, tblGenerale.meetingActivities, tblGenerale.meetingSeason1, tblGenerale.meetingSeason2, tblGenerale.meetingSeason3, tblGenerale.meetingSeason4, tblGenerale.meetingWhen, tblGenerale.nbGuest, tblGenerale.siteHow, tblGenerale.siteHowOther, tblGenerale.comments, tblGenerale.communication, tblGenerale.newsFlag, tblGenerale.flyerFlag, tblGenerale.partnerNewsFlag FROM tblGenerale;"
'Set the cursor type we are using so we can navigate through the recordset
rsADD.CursorType = 2
'Set the lock type so that the record is locked by ADO when it is updated
rsADD.LockType = 3
'Open the recordset with the SQL query
---> rsADD.Open strSQL, adoCon
'Tell the recordset we are adding a new record to it
rsADD.AddNew
'Add a new record to the recordset
rsADD.Fields("prefixName") = Request.Form("prefixName")
rsADD.Fields("firstName") = Request.Form("firstName")
rsADD.Fields("lastName") = Request.Form("lastName")
rsADD.Fields("email") = Request.Form("email")
rsADD.Fields("company") = Request.Form("company")
rsADD.Fields("fonction") = Request.Form("fonction")
rsADD.Fields("address") = Request.Form("address")
rsADD.Fields("city") = Request.Form("city")
rsADD.Fields("country") = Request.Form("country")
rsADD.Fields("province") = Request.Form("province")
rsADD.Fields("provinceOther") = Request.Form("provinceOther")
rsADD.Fields("postalCode") = Request.Form("postalCode")
rsADD.Fields("phoneNum") = Request.Form("phoneNum")
rsADD.Fields("faxNum") = Request.Form("faxNum")
rsADD.Fields("dateFrom") = Request.Form("dateFrom")
rsADD.Fields("hourIn") = Request.Form("hourIn")
rsADD.Fields("minuteIn") = Request.Form("minuteIn")
rsADD.Fields("dateTo") = Request.Form("dateTo")
rsADD.Fields("hourOut") = Request.Form("hourOut")
rsADD.Fields("minuteOut") = Request.Form("minuteOut")
rsADD.Fields("nbNights") = Request.Form("nbNights")
rsADD.Fields("nbPersons") = Request.Form("nbPersons")
rsADD.Fields("nbRooms") = Request.Form("nbRooms")
rsADD.Fields("evenementType1") = Request.Form("evenementType1")
rsADD.Fields("evenementType2") = Request.Form("evenementType2")
rsADD.Fields("evenementType3") = Request.Form("evenementType3")
rsADD.Fields("evenementType4") = Request.Form("evenementType4")
rsADD.Fields("evenementType5") = Request.Form("evenementType5")
rsADD.Fields("evenementTypeOther") = Request.Form("evenementTypeOther")
rsADD.Fields("meetingActivities") = Request.Form("meetingActivities")
rsADD.Fields("meetingSeason1") = Request.Form("meetingSeason1")
rsADD.Fields("meetingSeason2") = Request.Form("meetingSeason2")
rsADD.Fields("meetingSeason3") = Request.Form("meetingSeason3")
rsADD.Fields("meetingSeason4") = Request.Form("meetingSeason4")
rsADD.Fields("meetingWhen") = Request.Form("meetingWhen")
rsADD.Fields("nbGuest") = Request.Form("nbGuest")
rsADD.Fields("siteHow") = Request.Form("siteHow")
rsADD.Fields("siteHowOther") = Request.Form("siteHowOther")
rsADD.Fields("comments") = Request.Form("comments")
rsADD.Fields("communication") = Request.Form("communication")
rsADD.Fields("newsFlag") = Request.Form("newsFlag")
rsADD.Fields("flyerFlag") = Request.Form("flyerFlag")
rsADD.Fields("partnerNewsFlag") = Request.Form("partnerNewsFlag")
'Write the updated recordset to the database
rsADD.Update
'Reset server objects
rsADD.Close
Set rsADD = Nothing
Set adoCon = Nothing
I'm wondering if there is a maximum of fields or not.
< Message edited by umponcel -- 11/13/2004 9:39:31 >
|
|
|
|
umponcel
Posts: 9 Joined: 11/11/2004 From: Saint-Sauveur, QC, Canada Status: offline
|
RE: Microsoft OLE DB Provider for ODBC Drivers error '8... - 11/12/2004 20:31:39
quote:
strCON = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("\fpdb\guestbook.mdb") This is the new result: Microsoft JET Database Engine error '80040e10' No value given for one or more required parameters. /forms/fr/corporative.asp, line 60
|
|
|
|
umponcel
Posts: 9 Joined: 11/11/2004 From: Saint-Sauveur, QC, Canada Status: offline
|
RE: Microsoft OLE DB Provider for ODBC Drivers error '8... - 11/13/2004 9:15:54
Yes, it is. I wrote this field name in french.
|
|
|
|
umponcel
Posts: 9 Joined: 11/11/2004 From: Saint-Sauveur, QC, Canada Status: offline
|
RE: Microsoft OLE DB Provider for ODBC Drivers error '8... - 11/13/2004 10:02:14
Ok, I did a response.write strSQL at line 60 and this is the respond from ASP: SELECT tblGenerale.prefixName, tblGenerale.firstName, tblGenerale.lastName, tblGenerale.email, tblGenerale.company, tblGenerale.fonction, tblGenerale.address, tblGenerale.city, tblGenerale.country, tblGenerale.province, tblGenerale.provinceOther, tblGenerale.postalCode, tblGenerale.phoneNum, tblGenerale.faxNum, tblGenerale.dateFrom, tblGenerale.hourIn, tblGenerale.minuteIn, tblGenerale.dateTo, tblGenerale.hourOut, tblGenerale.minuteOut, tblGenerale.nbNights, tblGenerale.nbPersons, tblGenerale.nbRooms, tblGenerale.evenementType1, tblGenerale.evenementType2, tblGenerale.evenementType3, tblGenerale.evenementType4, tblGenerale.evenementType5, tblGenerale.evenementTypeOther, tblGenerale.meetingActivities, tblGenerale.meetingSeason1, tblGenerale.meetingSeason2, tblGenerale.meetingSeason3, tblGenerale.meetingSeason4, tblGenerale.meetingWhen, tblGenerale.nbGuest, tblGenerale.siteHow, tblGenerale.siteHowOther, tblGenerale.comments, tblGenerale.communication, tblGenerale.newsFlag, tblGenerale.flyerFlag, tblGenerale.partnerNewsFlag FROM tblGenerale; ADODB.Recordset error '800a0e78' Operation is not allowed when the object is closed. So How can I fix my issue...?
|
|
New Messages |
No New Messages |
Hot Topic w/ New Messages |
Hot Topic w/o New Messages |
Locked w/ New Messages |
Locked w/o New Messages |
|
Post New Thread
Reply to Message
Post New Poll
Submit Vote
Delete My Own Post
Delete My Own Thread
Rate Posts
|
|
|