<![CDATA[
<%@ Language=VBScript EnableSessionState=FALSE%>
[an error occurred while processing this directive]
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>TzSession Example - Counting</title>
</head>
<body>
<%
' Call TzStartSession() before using TzSession and TzId.
TzStartSession()
' Load any string into the TzSession Dictionary object.
TzSession("login_id") = "Herten"
TzSession("count") = TzSession("count") + 1
' Write out any variables stored in the TzSession Dictionary object.
Response.Write(TzSession("count"))
Response.Write("<br/><a href=""" & Request.ServerVariables("SCRIPT_NAME") & "?TzId=" & TzId & """>Increase Count</a>")
Response.Write("<br/><br/> TzId: " & TzId)
Response.Write("<br/><br/><a href=""" & Request.ServerVariables("SCRIPT_NAME") & """>Zero Count (Link With No TzId)</a>")
' Call if TzWriteSession() if any changes are made to the TzSession Dictionary object.
TzWriteSession()
' In a html form pass the TzId in a hidden input field:
' Response.Write("<input type=""hidden"" name=""TzId"" value="&TzId&">")
%>
<br/><br/><br/>
Use the TzDumpDictionary() utility subroutine, during debugging, to print out the TzSession Dictionary object:
<br />
<% TzDumpDictionary(TzSession) %>
</body>
</html>
]]>