[Webinar] Streamline your web hosting managementRegister Today

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 217
  • Last Modified:

connection problem

ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/subscribe.asp, line 19

"objRecordset.Open "membertable", DB_CONNECTIONSTRING, adOpenKeyset, adLockPessimistic, adCmdTable"





The rest of my code is:


<%
Dim DB_CONNECTIONSTRING
DB_CONNECTIONSTRING = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("./member2.mdb") & ";pwd=o0o0p7bw109"    
Dim sUserName, sPassWord, sSecondPass, RS
Dim I ' Standard looping var
Dim iRecordAdded ' Id of added record
Dim iRecordCount ' Used only to keep a current count of records for DB Clean Up


if len(Request.Cookies("JAI")("MemberName"))< 1 then
response.write "We are sorry, we are unable to complete your subscription request due to one of the following reasons.<br><Br>"
response.write "1) You registered more then 3 days ago. If you do not varify the request within 3 days, you our automatically removed from the list<br>"
response.write "2) You have cleared your cookies, or cookies are disabled. Please ensure cookies are enabled and re-register."
response.write "<br><Br> <a href = http://www.johnsonadvertising.com/register> Register Again</a>"

else

     Set objRecordset = Server.CreateObject("ADODB.Recordset")
     objRecordset.Open "membertable", DB_CONNECTIONSTRING, adOpenKeyset, adLockPessimistic, adCmdTable
     objRecordset.CacheSize = 15 ' Cuts down on round trips to our SQL Server
     objRecordset.AddNew    
     objRecordset.Fields("MemberName") = Request.Cookies("JAI")("MemberName")
        objRecordset.Fields("MemberCompany") = sUserName
' Integer Data Type
     objRecordset.Fields("MemberEmail") = sEmail
        objRecordset.Fields("MemberPhone") = sPassword
        objRecordset.Fields("MemberAddress") = sAddress
        objRecordset.Fields("MemberCity") = sCity
        objRecordset.Fields("MemberState") = sState
        objRecordset.Fields("MemberZip") = sZip
        objRecordset.Fields("MemberFax") = sFax
     objRecordset.Update
     Response.Write "<FONT FACE = TAHOMA SIZE =1>You have been sucessfully added to our database.<br>We have sent and email to " & sEmail & " telling you your login information. Thank you</FONT>"
     objRecordset.Close
     Set objRecordset = Nothing
end if
%>


I cant figure out my problem, can someone help?
membertable is the correct name of my table...



0
TRD_Supra
Asked:
TRD_Supra
1 Solution
 
mberumenCommented:
These variables -adOpenKeyset, adLockPessimistic, adCmdTable- are declared in the adovbs.inc file,  did you make sure to use <!-- #include file=adovbs.inc-->  in your asp page?


   
0
 
TRD_SupraAuthor Commented:
thanks man!
0

Featured Post

The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now