File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/work\anni53rd
Editing: work/anni53rd/save_regis.asp
Full path: C:\ict\ICT\work\anni53rd\save_regis.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="Connectdb.asp"--> <html> <head> <title>Untitled Document</title> <meta http-equiv="Content-Type" content="text/html; charset=windows-874"> </head> <body> <form name="form1" action = "showdetail.asp" method="post"> <% fname=request.form("fname") name=request.form("name") sname=request.form("sname") position1=request.form("position1") addwork=request.form("addwork") address=request.form("address") tel=request.form("tel") fax=request.form("fax") email=request.form("email") sub_name=request.form("sub_name") type_pre=request.form("type_pre") mess=request.form("mess") pre_name=request.form("pre_name") response.write "fname="&fname&"=name="&name&"=sname="&sname&"=addwork="&addwork&"=address="&address&"=tel="&tel&"=fax="&fax&"=email="&email&"=sub_name="&sub_name&"=type_pre="&type_pre&"=mess="&mess&"=pre_name="&pre_name set ors=server.createobject("adodb.recordset") ors.open "select * from regis53rd where name='"&name&"' and '"&sname&"'",Conn,1,3 if ors.eof then sql1="insert into regis53rd(fname,name,sname,position1,addwork,address,tel,fax,email,sub_name,type_pre,pre_name,mess) values('"&fname&"','"&name&"','"&sname&"','"&position1&"','"&addwork&"','"&address&"','"&tel&"','"&fax&"','"&email&"','"&sub_name&"','"&type_pre&"','"&pre_name&"','"&mess&"')" set ors1 = Server.createobject("adodb.recordset") ors1.open sql1,conn,1,3 response.write sql1 session("name")=name session("sname")=sname set ors_=server.createobject("adodb.recordset") ors_.open "select * from regis53rd where name='"&name&"' and '"&sname&"'",Conn,1,3 if not ors_.eof then id_regis=ors_("id_regis") session("id_regis")=id_regis end if %> </form> <SCRIPT LANGUAGE="JavaScript"> form1.submit(); </SCRIPT> <% else response.write "�����ū��" response.write "<meta http-equiv=refresh content =5;url=regis.htm>" end if %> </body> </html>