Blame tests/syntax-highlighting/file.asp

Packit a7d494
<html>
Packit a7d494
<body>
Packit a7d494
Packit a7d494
<%
Packit a7d494
dim d
Packit a7d494
set d=Server.CreateObject("Scripting.Dictionary")
Packit a7d494
d.Add "o", "Orange"
Packit a7d494
d.Add "a", "Apple"
Packit a7d494
if d.Exists("o")= true then
Packit a7d494
    Response.Write("Key exists.")
Packit a7d494
else
Packit a7d494
    Response.Write("Key does not exist.")
Packit a7d494
end if
Packit a7d494
set d=nothing
Packit a7d494
%>
Packit a7d494
Packit a7d494
</body>
Packit a7d494
</html>