<%
Option Explicit
Dim ThePages
set ThePages = Server.CreateObject("Scripting.Dictionary")
ThePages.Add "Home", "To jest strona gwna witryny."
ThePages.Add "Support", "Tutaj znajdziesz nasz baz wiedzy."
ThePages.Add "Contact", " Ta jest nasza strona kontaktowa."
ThePages.Add "Sale", "Lista produktw bdcych aktualnie w sprzeday."
Response.Write ThePages.Item("Home") & "<P>"
Response.Write ThePages("Contact") & "<P>"
%>
