RDO Problem

Im getting this error on this
Dim oEnvironment as RDO.Environment
set oEnvironment = rdoEnviroments(0)

it happens on the rdoEnvironments(0)

any idea's?