inc_session.asp

来自「在线考试系统」· ASP 代码 · 共 17 行

<%

Sub SetSession(sVal)
	Session("CWFPTJIN-KKOD-AIXB-KZTDPOUE")=sVal
	Session.Timeout=45
End Sub

Function GetSession()
	If IsEmpty(Session("CWFPTJIN-KKOD-AIXB-KZTDPOUE")) Then
		GetSession=""
	Else
		GetSession=Session("CWFPTJIN-KKOD-AIXB-KZTDPOUE")
	End If
End Function

%>