Stata Automation not creating "StataOLEApp" Object (VBScript)

Hi folks,

I am trying to create the Object stata.StataOLEApp, but when I execute the following code, in VBScript:

I get the following message:
Array


I am using Stata 12 Version as you can see:

Array



Any guess of what is going on?

Thank you in advance!