/beta/admin/sysLock.asp
http://github.com/khaneh/Orders · ASP · 44 lines · 31 code · 6 blank · 7 comment · 3 complexity · 28bb833958f150501ad17fe18613e90c MD5 · raw file
- <%@LANGUAGE="VBSCRIPT" CODEPAGE="1256"%><%
- ' Admin
- PageTitle="ÞÝá ÓíÓÊã"
- SubmenuItem=5
- %>
- <!--#include file="top.asp" -->
- <BR><BR><BR><BR><BR><CENTER>
- <%
- '-----------------------------------------------------------------------------------------------------
- '---------------------------------------------------------------------------------- Submit new AO MEMO
- '-----------------------------------------------------------------------------------------------------
- if request("act")="open" then
- application("syslock") = ""
- application("syslockerName") = ""
-
- '-----------------------------------------------------------------------------------------------------
- '---------------------------------------------------------------------------------- Submit new AO MEMO
- '-----------------------------------------------------------------------------------------------------
- elseif request("act")="close" then
- application("syslock") = session("id")
- application("syslockerName") = session("CSRName")
-
- end if
-
- if application("syslock") <> "" then
- response.write "<H3>ÓíÓÊã ÊæÓØ "& application("syslockerName") & " ÞÝá ÔÏå ÇÓÊ</H3>"
- %>
- <FORM METHOD=POST ACTION="?act=open">
- <INPUT TYPE="submit" value="ÈÇÒ ßÑÏä ÞÝá">
- </FORM>
- <%
- else
- %>
- <FORM METHOD=POST ACTION="?act=close">
- <INPUT TYPE="submit" value="ÈÓÊä ÞÝá">
- </FORM>
- <%
- end if
-
- %>
-
- </CENTER>
-
- <!--#include file="tah.asp" -->