class objeto dim num 'Method seter example function setNum(numero) num = numero end function 'Method geter example function getNum() getNum = num end function end class dim obj 'Instance a new object example set obj = new objeto obj.setNum(5) Response.Write(obj.getNum())