Visual Basic - No puedo guardar en una bd

Life is soft - evento anual de software empresarial
 
Vista:

No puedo guardar en una bd

Publicado por Fernando (5 intervenciones) el 07/01/2006 17:22:02
Private Sub Guardar(contador, Tiempo)

Dim db As Database
Dim rs As Recordset

Set db = OpenDatabase("e:\Gescar\Gescar.mdb")

Set rs = db.OpenRecordset("SELECT * FROM Tiempos")

rs.AddNew
rs("Tiempo") = Tiempo
rs("Paso") = contador

rs.Update
rs.Close
db.Close

Desarrollo.Refresh
Call VerFinalLista


End Sub

Cuando ejecuto el codigo anterior me da un error en la linea " Set rs = db.OpenRecordset("SELECT * FROM Tiempos") " y "me dice error 13 en tiempo de ejecucion, no coincidenlos tipos pero no se que es lo que esta pasando"

Dede ya muchas gracias
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
Imágen de perfil de alberto
Val: 531
Bronce
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RE:No puedo guardar en una bd

Publicado por alberto (293 intervenciones) el 08/01/2006 10:54:21
Parece que el problema es debido a las referencias, ¿Que referencias tienes cargadas en tu proyecto?, y ¿en que orden?
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

RE:No puedo guardar en una bd

Publicado por Fernando (1 intervención) el 11/01/2006 01:06:05
Primero que nada gracias por tu tiempo y disculpa la demora.
Estas son las referencias y en este orden estan:

Visual Basic for Aplication
Visual Basic runtime objects and procedures
Visual Basic objects and procedures
OLE Automation
Microsoft ActiveX Data Object 2.0 Library
Microsoft Data Binding Collection
Microsoft DAO 3.51 Object Library
Microsoft Data Formating Object Library 6.0 (SP4)
Microsoft Connecttion Designer Instance 1.0
Microsoft Data Remote Object 2.0
Microsoft DTC Framework
Microsoft Agent Control 2.0

Bueno espero te sirva y puedas ayudarme con mi problema
Desde ya muchas gracias.
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

RE:No puedo guardar en una bd

Publicado por Fernando (2 intervenciones) el 13/01/2006 00:35:52
Urgente necesito ayuda con este problema....
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

RE:No puedo guardar en una bd

Publicado por paulo (14 intervenciones) el 13/01/2006 17:57:31
prueba con el Microsoft DAO 3.51 recordset Object Library
esta arriba del dao objet library
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
Imágen de perfil de alberto
Val: 531
Bronce
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RE:No puedo guardar en una bd

Publicado por alberto (293 intervenciones) el 13/01/2006 19:31:59
El problema está en que como la referencia A los ActiveX data object 2.0 esta antes que la referencia DAO 3.51 cuando declaras la variable rs esta se crea de tipo ADODB.Recordset y la función OpenRecordset devuelve un objeto de tipo DAO.Recordset, y los tipos no coinciden.

Prueva declarando rs de la siguiente forma:

dim rs as DAO.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