<%@ Language=VBScript CodePage ="1256"%>
<% Response.Buffer = True %>
<!-- #include file=conn.txt -->


<%
if request.form ("fname")="" or request.form ("email")="" then
Response.Redirect "nofieldserror.asp"
end if

addSQL = "SELECT * FROM [Application]
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open addSQL, conn, 1, 2
rs.AddNew

rs("fname") = request.form ("fname")
rs("sname") = request.form ("sname")
rs("tname") = request.form ("tname")
rs("suname") = request.form ("suname")
rs("Date") = request.form ("Date")
rs("ranking") = request.form ("ranking")
rs("Country") = request.form ("Country")
rs("City") = request.form ("City")
rs("pobox") = request.form ("pobox")
rs("pcode") = request.form ("pcode")
rs("telno") = request.form ("telno")
rs("exno") = request.form ("exno")
rs("mno") = request.form ("mno")
rs("email") = request.form ("email")
rs("Dagree") = request.form ("Dagree")
rs("filed") = request.form ("filed")
rs("ofiled") = request.form ("ofiled")
rs("rank1") = request.form ("rank1")
rs("exper") = request.form ("exper")
rs("post") = request.form ("post")


        rs.Update
		rs.Close
		Set rs = Nothing
		conn.Close
		Set conn = Nothing
		Response.Clear
		Response.Redirect "backapp.asp"

%>