File Manager
Back to List
| Current Directory: ~/
Editing: km_remove.asp
Full path: C:\ict\ICT\km_remove.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="Connectdb.asp"--> <!--#include file="km_chk_login.asp"--> <% pern=session("usernamekm") ' per="2" 'tb="letterin" '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 pern<>"" then %> <head> <body> <% dim ors id=request("id") set ors=server.createobject("adodb.recordset") sqlmark="update km_abs set abs_file='' where id_abs_km= '"&id&"'" ors.Open sqlmark, conn, 1, 3 %> <SCRIPT LANGUAGE="JavaScript"> <% response.write"alert('ź���������º���¤��');" %> --> </SCRIPT> <% response.write "<meta http-equiv='refresh' content ='0;url=index_km_stu.asp'>" Conn.Close 'end if %> </FORM> </body> </head> <% else %> <SCRIPT LANGUAGE="JavaScript"> <% response.write "window.location.href='index_km_stu.asp';" %> --> </SCRIPT> <% end if %>