File Manager

<%
		  pern=session("username")
		  per="2"
		  tb="qe"
		  sqlnc="select * from tb_permission where id_staff='"&pern&"' and tb_edit='"&per&"' and tb_name='"&tb&"'"
		  set orsnc=server.createobject("adodb.recordset")
		  orsnc.open sqlnc,conn,1,3
				if not orsnc.eof then
qe_id=request.form("qe_id")
qe_schedule=request.form("qe_schedule")
id_stu=request.form("id_stu")
qe_datetime=now
checkfw=request.form("checkfw")
'response.write qe_schedule
sqlc= "select * from qe_regis where id_stu='"&id_stu&"' and qe_id='"&qe_id&"'"
 set orsc=server.createobject("adodb.recordset")
 orsc.open sqlc,conn,1,3
 
if  orsc.eof then
sqlid="select * from qe_regis"
		set orsid=server.createobject("adodb.recordset")
		orsid.open sqlid,conn,1,3
		if  orsid.eof then
		id_regis="1"
		else
		orsid.movelast
		xx=orsid("id_regis")
		'response.write xx
		id_regis=1+xx
		'id_regis=xx+1
		end if
		qe_result="0"
sqldata="insert into qe_regis(qe_id,id_regis,id_stu,qe_date,qe_result) values("&qe_id&","&id_regis&",'"&id_stu&"','"&qe_datetime&"','"&qe_result&"')"
' response.write sqldata
set orsdata = Server.CreateObject("adodb.recordset")
				orsdata.open sqldata,conn,1,3
				sqlchse="select * from qe_regis2 where id_stu='"&id_stu&"' and qe_schedule='"&qe_schedule&"'"
				set orschse = Server.CreateObject("adodb.recordset")
				orschse.open sqlchse,conn,1,3
				
				if orschse.eof then
						sqldata2="insert into qe_regis2(id_stu,qe_schedule) values('"&id_stu&"','"&qe_schedule&"')"
						set orsdata2 = Server.CreateObject("adodb.recordset")
						orsdata2.open sqldata2,conn,1,3
						response.write "66"&sqldata2
				end if
		else
%>
<SCRIPT LANGUAGE="JavaScript">
<%

response.write"alert('�Ԫ� "&qe_course&" �١���͡���Ǥ�');"
		response.write "<meta http-equiv='refresh' content ='0;url=qe_regis.asp?id_stu="&id_stu&"'>"
%>
		-->
		</SCRIPT>
		<%
		end if

'response.write sqldata
%>
<SCRIPT LANGUAGE="JavaScript">
<%
'response.write "alert('�ѹ�֡���������º����');"
%>
		
		</SCRIPT>
		<%
if checkfw=2 then
response.write "<meta http-equiv='refresh' content ='0;url=qe_regis_all.asp?id2="&qe_schedule&"&id="&qe_id&"'>"
else

response.write "<meta http-equiv='refresh' content ='0;url=qe_regis.asp?id_stu="&id_stu&"'>"
end if
else
%>
<SCRIPT LANGUAGE="JavaScript">
<%

response.write "window.location.href='index.html';"
		%>
		-->
		</SCRIPT>
		<%
end if

File Manager

Editing: qe_regis_add.asp