Gracias Avellaneda ya estuve checando los demas temas y encontre efectivamente el comentas que solo hay q agregar
Cita: recorset.CursorLocation = adUseClient
Antes de abrirlo la cuestion es q ya lo puse y me brinca todo el proceso diciendome q mi paciente no tiene procedimientos y si se lo pongo despues me dice q esa operacion no es valida si esta abierto, ojla me puedan orientar para saber en q parte de mi codigo lo podria poner para su buen funcionamiento.
Saludos y Gracias