Visual Basic - Error 3705 Ayudenmeeee por favor

Life is soft - evento anual de software empresarial
   
Vista:

Error 3705 Ayudenmeeee por favor

Publicado por Walter Rodriguez (6 intervenciones) el 22/08/2008 19:22:38
Hola estoy con un problemita en el sistemita que estoy realizando, el error es el 3705 "La operación no se puede realizar porque el objeto esta abierto"
Es al cargar los datos de un cliente para que me controle según el documento de ese cliente para saber si ya existe en la base de datos, en la primera ves que ejecuto me funciona bien me dice que el cliente ya existe, pero cuando quiero cargarlo devuelta con el número de documento cambiado me salta el error. Acá les dejo el código espero me puedan ayudar gracias.
Saludos.
El error me da en la linea (rs.CursorLocation = adUseClient)
La conexión a la base de datos y la definicón del recorset lo tengo hecho en el Form_load()
El cierre de la conexión y del recorset lo tengo hecho en el Form_Unload()

'Para una base de datos normal
sSelect = "Select * FROM alumnos where alumno_doc =" & tb_docalcli
rs.CursorLocation = adUseClient
'Abrir el recordset de forma dinámica
rs.Open sSelect, cn, adOpenDynamic, adLockOptimistic
If rs.RecordCount > 0 Then
MsgBox ("El Alumno ya Existe")
tb_docalcli.SetFocus
Exit Sub
End If
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Error 3705 Ayudenmeeee por favor

Publicado por Salva (20 intervenciones) el 25/08/2008 08:25:33
Prueba del poner antes

Set rs = new Adodb.Recordset

para crear un nuevo recordset
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar