File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/finance
Editing: finance/save_edit_payment.asp.bak
Full path: C:\ict\ICT\finance\save_edit_payment.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="ConnectDB.asp"--> <!--#include file="chklogin.asp"--> <% ypay=request.form("ypay") id_budget_type=request.form("id_budget_type") username=session("username") id_pay=request.form("id_pay") id_dka=request.form("id_dka") id_paysub_sub=request.form("id_paysub_sub") id_paysub=request.form("id_paysub") id_paymain=request.form("id_paymain") dp=request.form("dp") mp=request.form("mp") yp=request.form("yp") date_no=request.form("date_no") amountp=request.form("amountp") plan_budget=request.form("plan_budget") outcome=request.form("outcome") date_mo=now if amountp="" then amountp=0 end if 'response.write ypay&"-"&id_budget_type&"-"&username&"-"&id_dka&"-"&id_paysub_sub&"-"&id_paysub&"-"&id_paymain&"-"&dp&"-"&mp&"-"&yp&"-"&amountp&"-"&id_project sqldata="update payment set ypay='"&ypay&"',id_budget_type='"&id_budget_type&"',id_dka='"&id_dka&"',id_paysub_sub='"&id_paysub_sub&"',id_paysub='"&id_paysub&"',id_paymain='"&id_paymain&"',dp='"&dp&"',date_mo='"&date_mo&"',mp='"&mp&"',yp='"&yp&"',amountp="&amountp&",status='edit',plan_budget='"&plan_budget&"',outcome='"&outcome&"' where id_pay="&id_pay&"" ' response.write sqldata set orsdata = Server.CreateObject("adodb.recordset") orsdata.open sqldata,conn,1,3 response.write "��䢢��������º�������Ǥ��" ' response.write idkey ' session("idkey")=idkey 'response.write sqldata 'if id_project="" then 'response.write "<meta http-equiv='refresh' content ='0;url=detail_payment.asp'>" 'else response.write "<meta http-equiv='refresh' content ='2;url=edit_payment.asp?idkey="&id_pay&"'>" 'end if %>