session.inc

来自「一个软件工程的软件质量web跟踪管理系统」· INC 代码 · 共 15 行

<P><a href="http://<%=Request.ServerVariables("SERVER_Name")%>/drugShop/" id="HH" target="_top" ></a></P>
<SCRIPT LANGUAGE=VBscript>
<!--
	strOperID="<%=Session("OperID")%>"
	strOperName="<% =Session("OperName") %>"
	strCN="<%=Session("constr")%>" 
	strMacAdd="<% =Session("MacAdd") %>"
	strSN="<% =Session("SNStr") %>"
  	if len(Trim(strOperID))=0 or len(Trim(strOperName))=0 or len(Trim(strCN))=0 or len(Trim(strSN))=0 or len(Trim(strMacAdd))=0 then
		MsgBox "会话过期，请重新登录！",,"瑞得药店管理系统"
		HH.click()
	end if
-->
</SCRIPT>