PageRenderTime 13ms CodeModel.GetById 7ms app.highlight 2ms RepoModel.GetById 1ms app.codeStats 0ms

/beta/AR/top.asp

http://github.com/khaneh/Orders
ASP | 117 lines | 107 code | 9 blank | 1 comment | 15 complexity | 5af62923ce4171fe5bca8f77b58e3de5 MD5 | raw file
  1<%
  2'AR (6)
  3PageTitle= "�������� ���� - " +PageTitle
  4menuItem=6
  5
  6%>
  7<!--#include file="../menu.asp" -->
  8<TABLE cellspacing=0 cellpadding=0 width=100% height=380 style='border:4px solid <%=SelectedMenuColor%>;' dir=rtl align=center>
  9<TR height=20 bgcolor=<%=SelectedMenuColor%>>
 10	<TD>
 11		<TABLE cellspacing=0 cellpadding=0 width=100%>
 12		<TR class=alak height=25 >
 13
 14			<%'if Auth(6 , 1) or Auth(6 , 3) then %>
 15			<%if SubmenuItem="1" then %> 
 16				<TD width=10><img src='/images/RTB.gif'></td>
 17				<TD align=center background="/images/MTB.gif" class='alak2'><A HREF='Invoice.asp'> ������ </A></TD>
 18				<TD width=10><img src='/images/LTB.gif'></td>
 19			<%else %>  
 20				<TD width=10><img src='/images/RTS.gif'></td>
 21				<TD align=center background="/images/MTS.gif" class='alak'><A HREF='Invoice.asp'> ������ </A></TD>
 22				<TD width=10><img src='/images/LTS.gif'></td>
 23			<%end if %>
 24			<%'end if %>
 25
 26			<%if Auth(6 , 2) then %>
 27			<%if SubmenuItem="2" then %> 
 28				<TD width=10><img src='/images/RTB.gif'></td>
 29				<TD align=center background="/images/MTB.gif" class='alak2'><A HREF='MemoInput.asp'>������� </A></TD>
 30				<TD width=10><img src='/images/LTB.gif'></td>
 31			<%else %>  
 32				<TD width=10><img src='/images/RTS.gif'></td>
 33				<TD align=center background="/images/MTS.gif" class='alak'><A HREF='MemoInput.asp'>������� </A></TD>
 34				<TD width=10><img src='/images/LTS.gif'></td>
 35			<%end if %>
 36			<%end if %>
 37
 38			<%if Auth(6 , 4) or Auth(6 , 5) then %>
 39			<%if SubmenuItem="4" then %> 
 40				<TD width=10><img src='/images/RTB.gif'></td>
 41				<TD align=center background="/images/MTB.gif" class='alak2'><A HREF='RevInvoiceInput.asp'> ������ �ѐ��</A></TD>
 42				<TD width=10><img src='/images/LTB.gif'></td>
 43			<%else %>  
 44				<TD width=10><img src='/images/RTS.gif'></td>
 45				<TD align=center background="/images/MTS.gif" class='alak'><A HREF='RevInvoiceInput.asp'> ������ �ѐ��</A></TD>
 46				<TD width=10><img src='/images/LTS.gif'></td>
 47			<%end if %>
 48			<%end if %>
 49
 50			<%if Auth(6 , 6) then %>
 51			<%if SubmenuItem="6" then %> 
 52				<TD width=10><img src='/images/RTB.gif'></td>
 53				<TD align=center background="/images/MTB.gif" class='alak2'><A HREF='AccountReport.asp?act=search'>����� ����</A></TD>
 54				<TD width=10><img src='/images/LTB.gif'></td>
 55			<%else %>  
 56				<TD width=10><img src='/images/RTS.gif'></td>
 57				<TD align=center background="/images/MTS.gif" class='alak'><A HREF='AccountReport.asp?act=search'>����� ����</A></TD>
 58				<TD width=10><img src='/images/LTS.gif'></td>
 59			<%end if %>
 60			<%end if %>
 61
 62			<%if Auth(6 , 7) then %>
 63			<%if SubmenuItem="7" then %> 
 64				<TD width=10><img src='/images/RTB.gif'></td>
 65				<TD align=center background="/images/MTB.gif" class='alak2'><A HREF='ItemsRelation.asp'>�����</A></TD>
 66				<TD width=10><img src='/images/LTB.gif'></td>
 67			<%else %>  
 68				<TD width=10><img src='/images/RTS.gif'></td>
 69				<TD align=center background="/images/MTS.gif" class='alak'><A HREF='ItemsRelation.asp'>�����</A></TD>
 70				<TD width=10><img src='/images/LTS.gif'></td>
 71			<%end if %>
 72			<%end if %>
 73
 74			<%if Auth(6 , 8) then %>
 75			<%if SubmenuItem="8" then %> 
 76				<TD width=10><img src='/images/RTB.gif'></td>
 77				<TD align=center background="/images/MTB.gif" class='alak2'><A HREF='CSRreport.asp?act=show'>����� ����</A></TD>
 78				<TD width=10><img src='/images/LTB.gif'></td>
 79			<%else %>  
 80				<TD width=10><img src='/images/RTS.gif'></td>
 81				<TD align=center background="/images/MTS.gif" class='alak'><A HREF='CSRreport.asp?act=show'>����� ����</A></TD>
 82				<TD width=10><img src='/images/LTS.gif'></td>
 83			<%end if %>
 84			<%end if %>
 85
 86			<%if Auth("C" , 0) then %>
 87			<%if SubmenuItem="11" then %> 
 88				<TD width=10><img src='/images/RTB.gif'></td>
 89				<TD align=center background="/images/MTB.gif" class='alak2'><A HREF='OtherReports.asp'>���� ����� ��</A></TD>
 90				<TD width=10><img src='/images/LTB.gif'></td>
 91			<%else %>  
 92				<TD width=10><img src='/images/RTS.gif'></td>
 93				<TD align=center background="/images/MTS.gif" class='alak'><A HREF='OtherReports.asp'>���� ����� ��</A></TD>
 94				<TD width=10><img src='/images/LTS.gif'></td>
 95			<%end if %>
 96			<%end if %>
 97
 98			<TD  width=50 align=left bgcolor=<%=SelectedMenuColor%>></TD>
 99			<TD  align=left bgcolor=<%=unSelectedSubMenuColor%>><A HREF="../logout.asp">���� </A></TD>
100		</TR>
101		</TABLE>
102	</TD>
103</TR>
104<TR>
105	<TD colspan=2 valign=top bgcolor=<%=AppFgColor%>>
106	<%
107	if request.queryString("errmsg")<>"" then
108		response.write "<br>" 
109		call showAlert (request.queryString("errmsg"),CONST_MSG_ERROR) 
110		response.write "<br>" 
111	end if
112	if request.queryString("msg")<>"" then
113		response.write "<br>" 
114		call showAlert (request.queryString("msg"),CONST_MSG_INFORM) 
115		response.write "<br>" 
116	end if
117	%>