File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/grade
Editing: grade/del_semeyear.asp.bak
Full path: C:\ict\ICT\grade\del_semeyear.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="Connectdb.asp"--> <head> <body> <% semeter=session("semeter") id_year=session("id_year") if semeter="" and id_year="" then semeter=request("semeter") id_year=request("id_year") end if dim ors set ors=server.createobject("adodb.recordset") sqlmark="Delete from register where re_year="&id_year&" and semeter="&semeter&" " ors.Open sqlmark, conn, 1, 3 set orsa=server.createobject("adodb.recordset") sqlmarka="Delete from semeter where re_year='"&id_year&"' and semeter='"&semeter&"' " orsa.Open sqlmarka, conn, 1, 3 'response.write sqlmark %> <SCRIPT LANGUAGE="JavaScript"> <% response.write "alert('ź���������º����');" %> --> </SCRIPT> <% 'resposne.write "<meta http-equiv='refresh' content ='0;url=choose_course_form.asp?id_category="&id_category&" '>" response.write "<meta http-equiv='refresh' content ='0;url=index.asp'>" Conn.Close 'end if %> </FORM> </body> </head>