File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/journal
Editing: journal/del_manu.asp
Full path: C:\ict\ICT\journal\del_manu.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="Connectdb.asp"--> <!--#include file="chk_login.asp"--> <% pern=session("idm") idmanu=request("idmanu") sqlnc="select * from manuscript where id_manu='"&idmanu&"' and id_member='"&pern&"'" 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 manuscript where id_manu= '"&idmanu&"'" ors.Open sqlmark, conn, 1, 3 set orsd=server.createobject("adodb.recordset") sqld="Delete from manu_hitstatus where id_manu= '"&idmanu&"'" orsd.Open sqld, conn, 1, 3 'response.write sqlmark %> <SCRIPT LANGUAGE="JavaScript"> <% response.write"alert('ź���������º���¤��');" %> --> </SCRIPT> <% response.write "<meta http-equiv='refresh' content ='0;url=detail_member.asp'>" Conn.Close 'end if %> </FORM> </body> </head> <% else %> <SCRIPT LANGUAGE="JavaScript"> <% response.write "window.location.href='index.asp';" %> --> </SCRIPT> <% end if %>