File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/finance
Editing: finance/edit_payment_form.asp
Full path: C:\ict\ICT\finance\edit_payment_form.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="ConnectDB.asp"--> <!--#include file="chklogin.asp"--> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"><!-- InstanceBegin template="/Templates/index.dwt" codeOutsideHTMLIsLocked="false" --> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-874" /> <!-- InstanceBeginEditable name="doctitle" --> <title>�к���Ǩ�ͺ��¨��¡���Թ</title> <!-- InstanceEndEditable --> <style type="text/css"> <!-- .style1 { color: #FFFFFF; font-weight: bold; } --> </style> <!-- InstanceBeginEditable name="head" --><!-- InstanceEndEditable --> </head> <body> <table width="100%" border="1" cellspacing="0" bordercolor="#990000"> <tr> <td colspan="2" bgcolor="#9900FF"><div align="right" class="style1">��§ҹ��������<br /> ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��</div></td> </tr> <tr> <td width="12%" align="left" valign="top"><table width="144" border="0" cellspacing="0"> <tr> <td width="134" bgcolor="#CCCCCC"><a href="index.asp">˹���á</a></td> </tr> <tr> <td><a href="index_paysub_sub.asp">��������</a></td> </tr> <tr> <td bgcolor="#CCCCCC"><a href="index_paysub.asp">��Ǵ��¨���</a></td> </tr> <tr> <td><a href="index_paymain.asp">��</a></td> </tr> <tr> <td></td> </tr> <tr> <td bgcolor="#CCCCCC"><a href="index_plan_budget.asp">Ἱ������ҳ</a></td> </tr> <tr> <td bgcolor="#FFFFFF"><a href="index_outcome.asp">�ż�Ե</a></td> </tr> <tr> <td bgcolor="#CCCCCC"><a href="report_paymain.asp">��§ҹ</a></td> </tr> <tr> <td><a href="log_out.asp">Log Out</a> </td> </tr> </table></td> <td align="left" valign="top"><!-- InstanceBeginEditable name="EditRegion1" --> <% idkey=session("idkey") sqlc="select * from payment where id_pay="&idkey&"" set orsc= Server.CreateObject("adodb.recordset") orsc.open sqlc,conn,1,3 if not orsc.eof then %> <form action="" method="get"> <table width="500" border="0" align="center"> <tr> <td colspan="2" bgcolor="#CC99FF"><div align="center"><strong>��������´��������</strong></div></td> </tr> <tr> <td width="206">���ʤ�������</td> <td width="284"><% response.write orsc("id_pay") %> <input name="textfield" type="text" value=<%=orsc("id_pay")%> readonly /></td> </tr> <tr> <td bgcolor="F1F2F0">�է�����ҳ</td> <td bgcolor="F1F2F0"><% response.write orsc("ypay") %></td> </tr> <tr> <td>������������ҳ</td> <td><% response.write orsc("id_budget_type") id_budget_type=orsc("id_budget_type") ' response.write id_budget_type sqlbt="select * from type_budget where id_budget_type ="&orsc("id_budget_type")&"" set orsbt=server.createobject("adodb.recordset") ' response.write sqlbt ' response.write id_budget_type orsbt.open sqlbt,conn,1,3 if not orsbt.eof then response.write orsbt("n_budget_type") ' response.write id_budget_type end if %></td> </tr> <tr> <td bgcolor="F1F2F0">�Ţ�ա�</td> <td bgcolor="F1F2F0"><% response.write orsc("id_dka") %></td> </tr> <tr> <td>��������</td> <td><% response.write orsc("id_paysub_sub") sqlpss="select * from paysub_sub where id_paysub_sub ="&orsc("id_paysub_sub")&"" set orspss=server.createobject("adodb.recordset") ' response.write sqlbt ' response.write id_budget_type orspss.open sqlpss,conn,1,3 if not orspss.eof then response.write orspss("n_paysub_sub") ' response.write id_budget_type end if %></td> </tr> <tr> <td bgcolor="F1F2F0">��Ǵ����</td> <td bgcolor="F1F2F0"><% response.write orsc("id_paysub") sqlps="select * from paysub where id_paysub="&orsc("id_paysub")&"" set orsps=server.createobject("adodb.recordset") ' response.write sqlbt ' response.write id_budget_type orsps.open sqlps,conn,1,3 if not orsps.eof then response.write orsps("n_paysub") ' response.write id_budget_type end if %></td> </tr> <tr> <td>��Ǵ��ѡ</td> <td><% response.write orsc("id_paymain") sqlpm="select * from paymain where id_paymain ="&orsc("id_paymain")&"" set orspm=server.createobject("adodb.recordset") ' response.write sqlbt ' response.write id_budget_type orspm.open sqlpm,conn,1,3 if not orspm.eof then response.write orspm("n_paymain") ' response.write id_budget_type end if %></td> </tr> <tr> <td bgcolor="F1F2F0">�ѹ�����͡���</td> <td bgcolor="F1F2F0"><% response.write orsc("dp")&"/"&orsc("mp")&"/"&orsc("yp") %></td> </tr> <tr> <td>�Ҥ�</td> <td><% response.write orsc("amountp") %></td> </tr> <tr> <td bgcolor="F1F2F0">���ѹ�֡</td> <td bgcolor="F1F2F0"><% response.write orsc("username") %></td> </tr> <tr> <td>�ѹ���ҷ��ѹ�֡</td> <td><% response.write orsc("date_mo") %></td> </tr> <tr> <td bgcolor="#F1F2F0">Ἱ������ҳ</td> <td bgcolor="#F1F2F0"> </td> </tr> <tr> <td>�ż�Ե</td> <td> </td> </tr> <tr> <td colspan="2" bgcolor="#CC66FF"><div align="center" class="style1"> <label> <input type="submit" name="Submit" value="�ѹ�֡" /> </label> </div></td> </tr> </table> </form> <% else response.write "no data" end if %> <!-- InstanceEndEditable --></td> </tr> </table> </body> <!-- InstanceEnd --></html>