File Manager

<head>
<body>
<form  name="form1"  Action = "" method="post">
	  <%

dim ors
id_lecturer=request.querystring("id_lecturer")
'name_stu=request.querysting("txtname_stu")
'sur_stu=request.querysting("txtsur_stu")
'response.write"<tr><td>" &id_mea&"</td>"
set ors=server.createobject("adodb.recordset")
	 sqlmark="Delete from lecturer  where id_lecturer= "&id_lecturer&"  "

ors.Open sqlmark, conn, 1, 3
		response.write"ź�������������º�������Ǩ��"
'sql_search_meas="select * from measurement_ms where meas_ref="&id_res&""
'set ors_search_meas=server.createobject("adodb.recordset")
'ors_search_meas.open sql_search_meas,conn,1,3
'if not ors_search_meas.eof then

'ors_search_meas.movefirst
'do while not ors_search_meas.eof 
      
'		sql_measref = "update measurement_ms set  meas_ref=0 where meas_ref = "&id_res&""
'		set ors_measref=server.createobject("adodb.recordset")
'		ors_measref.open sql_measref,conn,1,3
'ors_search_meas.movenext
'loop
'end if
'	On Error Resume Next
 '   oRs.Close
    Conn.Close

'end if
%>
<meta http-equiv="refresh" content ="2;url=.asp">
</FORM>
</body>
</head>

File Manager

Editing: del_lec.asp.bak