首页 / 编程脚本 / 一个最简单的vbs类实例代码

class CFoo
    sub PrintHello（）
        response.Write "Hello World！"
    end sub
end class

dim obj
set obj = new CFoo 
call obj.PrintHello
set obj = nothing