File Manager

<%
		  pern=session("username")
		  per="2"
		  tb="research"
		  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=request("id")
set ors=server.createobject("adodb.recordset")
	 sqlmark="Delete from other_lec  where id_other_lec= '"&id&"'"

ors.Open sqlmark, conn, 1, 3
	sqldel="delete from cowork_res where id_lecturer='"&id&"'"
	set orsdel=server.createobject("adodb.recordset")
	orsdel.open sqldel,conn,1,3
	%>
<SCRIPT LANGUAGE="JavaScript">
<%
		response.write"alert('ź���������º���¤��');"

%>
		-->
		</SCRIPT>
		<%
		response.write "<meta http-equiv='refresh' content ='0;url=other_res.asp'>"

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: del_other_lec.asp