File Manager

<%
idmanu=request("id_manu")

'if idmanu <>"" then
sql="select * from manuscript where id_manu='"&idmanu&"'"
	  Set ors = Server.CreateObject("ADODB.Recordset")
    ors.Open sql, Conn, 1, 3
	'response.write sql

if not ors.eof then
	id_status=ors("id_status")
	if id_status=8 then
				date_mo=now
				sqldata="update manuscript set id_journal='' where idmanu='"&idmanu&"'"
				  'response.write sqldata
				  set orsdata=server.createobject("adodb.recordset")
				 orsdata.open sqldata,conn,1,3
				 
				 	%>
<SCRIPT LANGUAGE="JavaScript">
<%
		response.write"alert('�������͡�ҡ���������º���¤��');"

%>
		-->
		</SCRIPT>
		<%
		response.write "<meta http-equiv='refresh' content ='0;url=add_tojournal_form.asp?id_manu="&idmanu&"'>"
'response.write "idmanu="&idmanu
'Response.Redirect ("detail_letterin.asp?id="&id)

else
'response.write "idm="&idm
	'	response.write "idmanu="&idmanu
%>
<SCRIPT LANGUAGE="JavaScript">
<%

'	response.write "window.location.href='index.asp';"
	
		%>
		-->
		</SCRIPT>
		<%
		'else 
		response.write "�������ö��䢢����������Ǥ��"
		end if
		end if
'end if

File Manager

Editing: journal/remove_mjournal.asp.bak