class CFoo
sub PrintHello()
response.Write "Hello World!"
end sub
end class
dim obj
set obj = new CFoo
call obj.PrintHello
set obj = nothing
sub PrintHello()
response.Write "Hello World!"
end sub
end class
dim obj
set obj = new CFoo
call obj.PrintHello
set obj = nothing