Por que me marca error mi conexion de ADODB?

Asi hago mi conexion:

strConexion = "Provider = SQLOLEDB.1;" & _
"Persist Security Info = False;" & _
"Initial Catalog = CONTROL;" & _
"Data Source = SERVIDOR1"

donde CONTROLes mi Base de Datos y SERVIDOR1 mi servidor de BD, supongo que
es la conexion la del problema por que al ejecutar un query de la sig. forma:

strConsulta = "Select CONEXION" & vbCr & _
"From CONEXIONSERVIDOR " & vbCr & _
"Where SISTEMA = 'USUARIOS'"

donde CONEXIONSERVIDOR es una tabla dentro de la BD CONTROL me marca el
siguiente error al intentar leer el recordset de la sig. forma
rsConsulta("TRA_NOMBRE")

el error dice: "Unable to cast object of type 'ADODB.InternalField' to type
'System.String'."