<!-- Collection of code snippets by Arne Vajhøj -->
<!-- posted to eksperten.dk, usenet and other places (2002-now) -->
<%
a = "123"
b = "456"
' save
Set foobar = Server.CreateObject("Scripting.Dictionary")
foobar.Add "a", a
foobar.Add "b", b
Set Session("foobar") = foobar
' retrieve
a = Session("foobar")("a")
b = Session("foobar")("b")
'
Response.Write a & " " & b
%>