connection

[heero]

<%
dim Conn
dim querySQL
OpenConnection Conn

dim fname
dim lname
dim email
dim password
dim conPassword

Dim url_redirect

fname = trim(request.form("txtFirstName"))

response.write( ""&fname)
lname = trim(request.form("txtLastName"))
email = trim(request.form("txtMail"))
password = trim(request.form("txtPassword"))
conPassword = trim(request.form("txtConPassword"))

Dim insertSQL
Set rsInsert = Server.CreateObject("ADODB.Recordset")

'Insert into userdata table
insertSQL = ""
insertSQL = "INSERT INTO userdata("
insertSQL = insertSQL & "First_Name"
insertSQL = insertSQL & ", Last_Name"
insertSQL = insertSQL & ", Email"
insertSQL = insertSQL & ", Password"
insertSQL = insertSQL & ", Confirm_Password"


insertSQL = insertSQL & ") VALUES("
insertSQL = insertSQL & "'" &fname& "'"
insertSQL = insertSQL & ",'" &lname& "'"
insertSQL = insertSQL & ",'" &email& "'"
insertSQL = insertSQL & ",'" &password& "'"
insertSQL = insertSQL & ",'" &conPassword& "'"

rsInsert.Open insertSQL, Conn

'url_redirect = ""
'url_redirect = "process_result.asp?Msg=SUCCESSADD&fname=" &fname& "&lname=" &lname
'response.redirect(url_redirect)

CloseConnection Conn

%>

error message for tis code:
Error Type:
ADODB.Recordset (0x800A0BB9)
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.


hi
can help me check wat error i haf for this code??

thanks... alot

[shahid]

YOU MISS TO CLOSE THE ) AT THE END


insertSQL = insertSQL & ") VALUES("
insertSQL = insertSQL & "'" &fname& "'"
insertSQL = insertSQL & ",'" &lname& "'"
insertSQL = insertSQL & ",'" &email& "'"
insertSQL = insertSQL & ",'" &password& "'"
insertSQL = insertSQL & ",'" &conPassword& "')"

try now...........

[Sharp]