The following line certainly looks suspicious.
oConn.open Application("../fpdb/database.mdb")
Even if you have your conenction string stored in teh
Applciation object, I doubt that "../fpdb/database.mdb" is
a valid application variable name. You probbly need
something like:
oConn.open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & _
server.mappath("../fpdb/database.mdb") & ";")
Also, because you coded:
oRS.Open "results", oConn, adOpenForawardOnly, _
adLockReadOnly, adCmdTable
Be sure to SSI-include the adovbs.inc file, or to define
the adOpenForawardOnly, adLockReadOnly, and adCmdTable
constants some other way.
Also, this looks a bit fishy:
oRS.UpdateBatch
If you're trying to insert a record, you need:
oRS.AddNew
Jim Buyens
Microsoft FrontPage MVP
http://www.interlacken.com
Author of:
*------------------------------------------------------*
|\----------------------------------------------------/|
|| Microsoft Office FrontPage 2003 Inside Out ||
|| Microsoft FrontPage Version 2002 Inside Out ||
|| Web Database Development Step by Step .NET Edition ||
|| Troubleshooting Microsoft FrontPage 2002 ||
|| Faster Smarter Beginning Programming ||
|| (All from Microsoft Press) ||
|/----------------------------------------------------\|
*------------------------------------------------------*
>-----Original Message-----
>I'm getting connection errors when I try to post my web
page to
>database? Can someone help me...Here's the error:
>
>ADODB.Connection error '800a0e7c'
>
>Parameter object is improperly defined. Inconsistent or
incomplete
>information was provided.
>
>/taxapp/installments.asp, line 207
>
>
>Here's my code:
>
><%
>
> set oConn=Server.CreateObject("ADODB.Connection")
> oConn.open Application("../fpdb/database.mdb")
> dim oRS
> set oRS=server.CreateObject("ADODB.recordset")
> oRS.Open "results", oConn, adOpenForawardOnly,
adLockReadOnly,
>adCmdTable
> oRS.UpdateBatch
> oRS("owner")=request.form("owner")
> oRS("legal")=request.form("legal")
> oRS("address1")=request.form("address1")
> oRS("address2")=request.form("address2")
> oRS("address3")=request.form("address3")
> oRS("address4")=request.form("address4")
> oRS("city")=request.form("city")
> oRS("state")=request.form("state")
> oRS("zip")=request.form("zip")
> oRS("number")=request.form("number")
> oRS("pmid")=request.form("pmid")
> oRS("app_code")=request.form("app_code")
> oRS("description")=request.form("description")
> oRS("Email1")=request.form("Email1")
> oRS("Email2")=request.form("Email2")
> oRS("area_code")=request.form("area_code")
> oRS("phone1")=request.form("phone1")
> oRS("phone2")=request.form("phone2")
> oRS("confnum")=request.form("confnum")
> oRS.update
> oRS.close
> set oRS=Nothing
> %>
>
>Thanks if you can help!
>.
>
Similar Threads
