Hi friends here is my coding.. but i m facing one problem .. i used both mathod SQL mathod and open Record Set. but in both i m getting error massage can anyone help me out regarding thi.
Please Please Please help me out how i can solve this problem.
Error :
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/grc/registration.asp, line 85
Coding :
<%
dim conn, connstring
dim errdc,QSql,Qval
dim DataSuccess
dim UNameTT,PassTT,FNameTT,LNameTT, EmailTT,AgeTT,GenderTT,Address1TT,Address2TT,CityT T,StateTT,CountryTT,PhoneTT,MobileTT,FaxTT
set conn = server.createobject("ADODB.connection")
connstring = "provider = microsoft.jet.OLEDB.4.0; data source = " & server.mappath("data.mdb")
conn.open = connstring
UNameTT = request.form("Uname")
PassTT = request.form("PassT")
FNameTT =request.form("Fname")
LNameTT = request.form("LName")
EmailTT = request.form("EmailT")
AgeTT = request.form("AgeT")
GenderTT = request.form("Gender")
Address1TT = request.form("Address1")
Address2TT = request.form("Address2")
CityTT = request.form("CityT")
StateTT = request.form("StateT")
CountryTT = request.form("CountyT")
PhoneTT = request.form("phoneT")
MobileTT = request.form("MobileN")
FaxTT = request.form("FaxT")
set rs = server.CreateObject("adodb.recordset")
rs.Open "SELECT * from users",Conn,adOpenKeyset, adLockPessimistic, adCmdText
rs.addnew
rs.fields("UserName") = UnameTT
rs.fields("Password") = PAssTT
rs.fields("FName") = FnameTT
rs.fields("LName") = LNameTT
rs.fields("Email") = EmailTT
rs.fields("Age") = AgeTT
rs.fields("Gender") = GenderTT
rs.fields("Address1") = Address1TT
rs.fields("Address2") = Address2TT
rs.fields("City") = CityTT
rs.fields("State") = StateTT
rs.fields("Country") = CountryTT
rs.fields("Phone") = PhoneTT
rs.fields("Mobile") = MobileTT
rs.fields("Fax") = FaxTT
rs.update
' Method 2 using excute SQL command but error : Syntex Error in INSERT INTO
'set rs = conn.execute ("INSERT INTO Users (UserName, Password, Fname, LName, Email, Age, Gender, Address1, Address2, City, State, Country, Phone, Mobile, Fax) VALUES ('" & UNameTT & "','" & PassTT & "','" & FNameTT & "','" & LNameTT & "','" & EmailTT & "'," & AgeTT & ",'" & GenderTT & "','" & Address1TT & "','" & Address2TT & "','" & CityTT & "','" & StateTT & "','" & CountryTT & "','" & PhoneTT & "','" & MobileTT & "','" & FaxTT & "');")
' Method 2 using open SQL command but error : Syntex Error in INSERT INTO
'rs.open "Insert into Users(UserName,Password,Fname,LName,Email,Age,Gend er,Address1,Address2,City,State,Country,Phone,Mobi le,Fax) VALUES('UNameTT','PassTT','FNameTT','LNameTT','mai lTT',55,'GenderTT','Address1TT','Address2TT','City TT','StateTT','CountryTT','PhoneTT','MobileTT','Fa xTT')",conn
end if
rs.close
set rs = nothing
conn.close
set conn = nothing
end if