Hacer funcion para devolver un DataReader

[jaullo]

Primero que nada quita la variable duplicada de reader.

Segundo debes abrir la conexion antes de ejecutar el query, asi:

Código ASP:

Connection.open
Dim Command as new SqlCommand (queryString, connection)
 

Y por ultimo debes leer los valores del reader

Código ASP:

While reader.Read()
            variable= dR("campo")
        End While
 

Si eso no te funciona algo así debería hacerlo

Código ASP:

conexion.Open()
        Dim cM As New SqlCommand(accion, conexion)
        Dim dR As SqlDataReader = cM.ExecuteReader()
        While dR.Read()
            var= dR("campor")
 
        End While
        dR.Close()