ADODB.Recordset (0x800A0BB9) error [Archive]

rezzy

04-06-2008, 12:35 PM

hey all,

i am working on creating a site and i get that error.

heres the code i have

<HTML>
<HEAD>
<TITLE>Reservation Response</TITLE>
</HEAD>
<BODY>
<body bgcolor=\"#FFFF80\">
<body background=\"Background2.JPG\">
<FONT FACE=\"Castellar\">
<FONT COLOR=\"#400000\">

<H1>Reservation Confirmation</H1>

<%=Request.Cookies(\"MiniProject5\")(\"FirstName\")%><br>
<%=Request.Cookies(\"MiniProject5\")(\"LastName\")%><br>
Phone: <%=Request.Cookies(\"MiniProject5\")(\"Phone\")%><br>
Email: <%=Request.Cookies(\"MiniProject5\")(\"Email\")%><br>
Room: <%=Request.Cookies(\"MiniProject5\")(\"Room\")%><br>
Arrival Date: <%=Request.Cookies(\"MiniProject5\")(\"Arrival\")%><br>
Departure Date: <%=Request.Cookies(\"MiniProject5\")(\"Departure\")%><P>

<%
Dim myDSN, Connect, OnReservations
Set Connect = Server.CreateObject (\"ADODB.Connection\") myDSN = \"PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=\" & server.mappath(\"Reservations.mdb\")
Connect.Open myDSN
Set OnReservations = Server.CreateObject (\"ADODB.Recordset\") OnReservations.Open Connect, adOpenStatic, adOpenOptimistic %>

<%
OnReservations.AddNew
OnReservations(\"FirstName\") = Request.Cookies(\"MiniProject5\")(\"FirstName\")
OnReservations(\"LastName\") = Request.Cookies(\"MiniProject5\")(\"LastName\")
OnReservations(\"Phone\") = Request.Cookies(\"MiniProject5\")(\"Phone\")
OnReservations(\"Email\") = Request.Cookies(\"MiniProject5\")(\"Email\")
OnReservations(\"Room\") = Request.Cookies(\"MiniProject5\")(\"Room\")
OnReservations(\"Arrival\") = Request.Cookies(\"MiniProject5\")(\"Arrival\")
OnReservations(\"Departure\") = Request.Cookies(\"MiniProject5\")(\"Departure\")

OnReservations.Update
%>

<H3>This reservation has been saved.</H3>