....ASP problem...<persisting>

[adityadubey]

Please tell me what's wrong with this code, i am in a fix:

<% dim conn
set conn = Server.CreateObject("ADODB.connection")
conn.open "icopdb"
set rs = conn.execute("INSERT INTO registration (Name,Age,Gender,Nationality,Designation,Field,Ins titute,Address,Email,Telephone,Amount,Mode,Date) VALUES ('" &Request.Form("rname")& "','" &Request.Form("rage")& "','" &Request.Form("rgender")& "','" &Request.Form("rnationality")& "','" &request.Form("rdesignation")& "','" &request.Form("rfield")& "','" &request.Form("rinstitute")& "','" &request.Form("raddress")& "','" &request.Form("remail")& "','" &request.Form("rtelephone")& "','" &request.Form("ramount")& "','" &request.Form("rmode")& "','" &request.Form("rdate")& "')")
response.redirect "default.htm"
%>

thanks
Adi

[dinkumrocks]

I'm gussing "icopdb" is a DSN

....


<%
set conn = Server.CreateObject("ADODB.connection")
conn.open "DSN=icopdb"

Set RS = Server.CreateObject("ADODB.Command")
strSQL = "INSERT INTO registration (Name,Age,Gender,Nationality,Designation,Field,Ins titute,Address,Email,Telephone,Amount,Mode,Date) VALUES ('" & Request.Form("rname") & "','" & Request.Form("rage") & "','" & Request.Form("rgender") & "','" & Request.Form("rnationality") & "','" & request.Form("rdesignation") & "','" & request.Form("rfield") & "','" & request.Form("rinstitute") & "','" & request.Form("raddress") & "','" & request.Form("remail") & "','" & request.Form("rtelephone") & "','" & request.Form("ramount") & "','" & request.Form("rmode") & "','" & request.Form("rdate") & "')"
RS.ActiveConnection = conn
RS.CommandText = strSQL
RS.Execute
set RS = nothing
conn.Close
set conn = nothing

response.redirect "default.htm"
%>


-Naaman