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...