/beta/admin/sysLock.asp
ASP | 44 lines | 31 code | 6 blank | 7 comment | 3 complexity | 28bb833958f150501ad17fe18613e90c MD5 | raw file
1<%@LANGUAGE="VBSCRIPT" CODEPAGE="1256"%><% 2' Admin 3PageTitle="��� �����" 4SubmenuItem=5 5%> 6<!--#include file="top.asp" --> 7<BR><BR><BR><BR><BR><CENTER> 8<% 9'----------------------------------------------------------------------------------------------------- 10'---------------------------------------------------------------------------------- Submit new AO MEMO 11'----------------------------------------------------------------------------------------------------- 12if request("act")="open" then 13 application("syslock") = "" 14 application("syslockerName") = "" 15 16'----------------------------------------------------------------------------------------------------- 17'---------------------------------------------------------------------------------- Submit new AO MEMO 18'----------------------------------------------------------------------------------------------------- 19elseif request("act")="close" then 20 application("syslock") = session("id") 21 application("syslockerName") = session("CSRName") 22 23end if 24 25if application("syslock") <> "" then 26 response.write "<H3>����� ���� "& application("syslockerName") & " ��� ��� ���</H3>" 27 %> 28 <FORM METHOD=POST ACTION="?act=open"> 29 <INPUT TYPE="submit" value="��� ���� ���"> 30 </FORM> 31 <% 32else 33 %> 34 <FORM METHOD=POST ACTION="?act=close"> 35 <INPUT TYPE="submit" value="���� ���"> 36 </FORM> 37 <% 38end if 39 40%> 41 42</CENTER> 43 44<!--#include file="tah.asp" -->