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
		  %>

<head>
<body>
	  <%

dim ors
id_stu=request("ids")
id=request("id")
id2=request("id2")
id3=request("id3")
cforword=request("id4")
set ors=server.createobject("adodb.recordset")
	 sqlmark="Delete from qe_regis  where id_regis= '"&id&"'"
	 
    ors.Open sqlmark, conn, 1, 3
	%>
<SCRIPT LANGUAGE="JavaScript">
<%
		response.write"alert('ź���������º���¤��');"

%>
		-->
		</SCRIPT>
		<%
		if cforword=2 then
response.write "<meta http-equiv='refresh' content ='0;url=qe_regis_byc.asp?idc="&id3&"&idq="&id2&"'>"
		else
		response.write "<meta http-equiv='refresh' content ='0;url=qe_regis.asp?id_stu="&id2&"'>"
		'response.write id_stu
end if
Conn.Close

'end if
%>
</FORM>
</body>
</head>
<%
else
%>
<SCRIPT LANGUAGE="JavaScript">
<%

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

File Manager

Editing: qe_del_regis.asp