File Manager

<!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">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-874" />

<title>�к���Ǩ�ͺ��¨��¡���Թ</title>

<style type="text/css">

</style>

</head>

</table></td>
    <td align="left" valign="top"><form action="detail_payment.asp" method="get">
       <table width="100%" border="0">
         <tr>
           <td><table width="50%" border="0" align="center">
               <tr>
                 <td colspan="2" bgcolor="#990000"><div align="center" class="style1">���͡��͹�����ʴ���¡�ä������� </div></td>
                </tr>
               <tr>
                 <td width="113">��͹</td>
                 <td width="96"><select name="mp" id="mp">
	    			<option value="00">��͹</option>	
				  <option value="01">���Ҥ�</option>
				  <option value="02">����Ҿѹ��</option>
				  <option value="03">�չҤ�</option>
				  <option value="04">����¹</option>
				  <option value="05">����Ҥ�</option>
				  <option value="06">�Զع�¹</option>
				  <option value="07">�á�Ҥ�</option>
				  <option value="08">�ԧ�Ҥ�</option>
				  <option value="09">�ѹ��¹</option>
				  <option value="10">���Ҥ�</option>
				  <option value="11">��Ȩԡ�¹</option>
				  <option value="12">�ѹ�Ҥ�</option>
                  </select></td>
               </tr>
               <tr>
                 <td>�է�����ҳ</td>
                 <td><select name="ypay">
	<% 
	
mydate=date
myyear=year(mydate)

yearbegin=myyear+539
myyear=myyear+543
'response.write "<tr><td>"&yearbegin&"</td></tr>"
i=0

do while i<5
	%>
		<option <%
		if yearbegin=myyear then 
		%>
		value=<%=myyear%>
		selected
		<%else%>
		value=<%=yearbegin%>
		<%end if%>>
		<%=yearbegin%>
		</option>
		<%i=i+1
	yearbegin=yearbegin+1
		loop
		%>
            </select></td>
               </tr>
               <tr>
                 <td>������������ҳ</td>
                 <td><select name="id_budget_type">
<% 
			  set ors_o=server.createobject("adodb.recordset")
	 sqlmark_o="select * from type_budget"
	 ors_o.open sqlmark_o,Conn,1,3
	ors_o.movefirst
	do while not ors_o.eof
			response.write "<option value="&ors_o("id_budget_type")&">"&ors_o("n_budget_type")&" </option>"
		ors_o.movenext
		loop
		%>
	      </select></td>
               </tr>
               <tr>
                 <td colspan="2" bgcolor="#990000"><label>
                   <div align="center">
                     <input type="submit" name="Submit2" value="Submit" />
                    </div>
                 </label></td>
                </tr>
             </table>             
            <p>&nbsp;</p></td>
         </tr>
       </table>
       </form></td>
  </tr>
</table>
</body>
</html>

File Manager

Editing: finance/report_payment.html