Visual Basic - open y close conexiòn

hola, tengo un dataenvironment con una conexion con varios comandos y varios datareports, necesito saber que datareport se va a mostrar, entonces para actualizar la conexion necesio abrir y cerrar la conexion
if DataEnviroment.Conexion.state= ...open then
DataEnviroment.Conexion..close
end if

select case
case 1
DataEnviroment.Conexion.open "miruta."
end select

al principio funciona pero despues vota un error
conexxion no es un procedimiento almacenado como abro y cierro las conexiones.