Hi,
     I am getting this Error

Error Type:
ADODB.Recordset (0x800A0BB9)
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/khandkeOnline/Images/classified/AddUser.asp, line 9

below is my code,I tried all combination of locktype but it gives this error everytime.I can retrive the data easily from the database just can't insert any record. Please help... This is the example from chapter 15.


AddUser.asp

<%
dim rsUsers
set rsUsers=Server.CreateObject("ADODB.Recordset")
SQL_str="Select * from Person where E_Mail='" & Session("E_Mail") & "' and Pword='" & Session("FormPass") & "'"
rsUsers.Open SQL_str, objConn,adOpenForwardOnly, adLockOptimistic, adCmdTable --> shows Error on this line

if Session("PersonId") <> " " then
  rsUsers.Filter="PersonId= '" & Session("PersonId") & "'"
 else
  rsUsers.Filter="E_Mail= '" & Request.Form("E_Mail") & "'" & "AND Pword= '" & Request.Form("FormPass") & "'"
   if rsUsers.EOF then
    rsUsers.AddNew
    'else
    ' Email, Password Matches with DB
    end if
 end if

rsUsers("E_Mail") =Request.Form("E_Mail")


Clssfd.asp


<%
 Option Explicit
 Dim objConn
 set objConn= Server.CreateObject("ADODB.Connection")
 objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; " & "Data Source=C:\Inetpub\wwwroot\khandkeProj\Images\Class ified\ClassData.mdb"

 if Session("blnValidUser")= True and Session("PersonId") = "" then
  Dim rsPersonIdCheck
  set rsPersonIdCheck=Server.CreateObject("ADODB.Records et")
  Dim strSQL
  strSQL="select PersonId from Person where E_Mail= '" & Session("E_Mail") & "';"
  rsPersonIdCheck.Open strSQL, objConn
  if rsPersonIdCheck.EOF Then
    Session("blnValidUser")= False
  else
    Session("PersonId") =rsPersonIdCheck("PersonId")
  End if
  rsPersonIdCheck.Close
  set rsPersonIdCheck = Nothing
 End if
%>

Hi Deepa,

Check out this - ADODB.Recordset error '800a0bb9' - Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.]

Also you shouldn't be using adCmdTable, as you use an SQL statement there to open the recordset. Only when you try to open the entire table using just the table name, without sql statement, you should use that parameter. Else in your case it should be adCmdText

Hope that helps.
Cheers!

_________________________
- Vijay G
Strive for Perfection

Thanks, My problem is solved, it was a space in # include statement.

Can someone help me with my code?

I've been trying to fix it for two days and nothing happened.
It always gives me the same error:
ADODB.Recordset (0x800A0BB9)
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
And it says that there is something wrong with line 4.

I am using two files here. The first one is an asp file (expprof.asp) which includes a database connection file (<!--#include

file="dbconnect.asp">). And another file (expeduc.asp) which is also included in the first file (<!--#include file="expeduc.asp">).
What I want is for expeduc.asp to display information from the database, that is, if the database contains the "id" of the person displayed in

expprof.asp, otherwise, display an ADD form to add information related again, to the person displayed in expprof.asp

<%
  Set rsNum = Server.CreateObject("ADODB.Recordset")
  numSQL = "select * from educations where exp_id = " & Request.QueryString("id") & ";"
  rsNum.Open numSQL, adoCon, 3, 3 ---> this line is said to have the error

  'count the number of records the person has in the educations table
  cnt = rsNum.RecordCount

  'if there are no records then the system must require the user to enter the information in the form below
  If (cnt < 1) Then
  %>
    <form name="addeduc" action="expeduc.asp?inc=1&id=<% Request.QueryString("id") %>&view=1" method="post">
    <table align="center">
     <tr><td align="center" colspan="2">Education</td></tr>
     <tr><td colspan="2"></td></tr>
     <tr>
      <td>Education:</td>
      <td><input type="text" name="educ" size="30"></td>
     </tr>
     <tr><td colspan="2" align="center"><input type="submit" name="Submit" value="Add"></td></tr>
    </table>
    </form>
  <%
     Set rsEduc = Server.CreateObject("ADODB.Recordset")
     educSQL = "select * from educations"
     rsEduc.Open educSQL, adoCon, 2, 3
     rsEduc.AddNew
     rsEduc.Fields("exp_id") = Request.QueryString("id")
     rsEduc.Fields("education") = Request.Form("educ")
     rsEduc.Update
     'rsEduc.Close
     'Response.Redirect("expeduc.asp")
     'Response.Write("Add Something")
  Else
     'display the Education when there is a record found in the database
     Response.Write(rsNum.Fields(2))
  End If
%>

watashi no namai wa hanako desu