main();
 
function main() {
    var ses = new ActiveXObject("OracleInProcServer.XOraSession");
    var db = ses.OpenDatabase( "ORCL", "scott/tiger", 0 );
    var rs = db.CreateDynaset( "SELECT 'Hello, oo4o World!' AS Message FROM DUAL", 4);

    while ( !rs.EOF )
    {
        WScript.Echo( rs(0).Name );
        WScript.Echo( "-------------------" );
        WScript.Echo( rs(0).Value );
        rs.MoveNext();
    }
}