File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/finance
Editing: finance/add_outcome.asp
Full path: C:\ict\ICT\finance\add_outcome.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="ConnectDB.asp"--> <!--#include file="chklogin.asp"--> <% 'id_pay=request.form("ypay") n_o=request.form("n_o") username=session("username") date_mo=now 'sqlc="select * from plan_budget" 'set orsc=server.createobject("adodb.recordset") 'orsc.open sqlc,conn,1,3 'if not orsc.eof then 'orsc.movelast 'n=orsc("id_paysub")+1 'else 'n=1 'end if sqldata="insert into outcome(outcome_name) values('"&n_o&"')" ' response.write sqldata set orsdata = Server.CreateObject("adodb.recordset") 'sqlcheck="select * from yearbudget where idyear='"&ypay&"' and id_budget_type='"&id_budget_type&"'" 'set orscheck=server.createobject("adodb.recordset") ' orscheck.open sqlcheck,conn,1,3 ' if orscheck.eof then orsdata.open sqldata,conn,1,3 'response.write sqldata response.write "�������������º���¤��" response.write "<meta http-equiv='refresh' content ='0;url=index_outcome.asp'>" %> <% 'response.write "�����ū�� " 'response.write "<meta http-equiv='refresh' content ='7;url=index.asp'>" %>