Datagrid y access
Hola! Tengo un problemilla y es que si utilizo access 2000 no me carga el datagrid y con el 97 sí. He puesto el 4.0 así que no se lo que puede ser, te mando un trozo de código a ver si ves el error. Gracias.
'REALIZO LA CONEXION
MiConexion.Provider = "Microsoft.Jet.OLEDB.4.0;"
MiConexion.ConnectionString = "Data Source=" & App.Path & "\fotos.mdb"
MiConexion.Open
Set MisReg = New ADODB.Recordset
MisReg.CursorType = adOpenKeyset
MisReg.LockType = adLockOptimistic
MisReg.ActiveConnection = MiConexion
'CARGO EL DATAGRID
Set misreg5 = New ADODB.Recordset
misreg5.CursorType = adOpenKeyset
misreg5.LockType = adLockOptimistic
misreg5.ActiveConnection = MiConexion
sql = "select * FROM ticket"
misreg5.Open sql, MiConexion
Set DataGrid2.DataSource = misreg5
'REALIZO LA CONEXION
MiConexion.Provider = "Microsoft.Jet.OLEDB.4.0;"
MiConexion.ConnectionString = "Data Source=" & App.Path & "\fotos.mdb"
MiConexion.Open
Set MisReg = New ADODB.Recordset
MisReg.CursorType = adOpenKeyset
MisReg.LockType = adLockOptimistic
MisReg.ActiveConnection = MiConexion
'CARGO EL DATAGRID
Set misreg5 = New ADODB.Recordset
misreg5.CursorType = adOpenKeyset
misreg5.LockType = adLockOptimistic
misreg5.ActiveConnection = MiConexion
sql = "select * FROM ticket"
misreg5.Open sql, MiConexion
Set DataGrid2.DataSource = misreg5
2 respuestas
Respuesta de kieleze
1
Lo que te falta es en la es lo mismo en la conexión y en el recordset.
Supongo que el mensaje de error que te aparece, dice que el conjunto de filas no acepta o no tiene marcadores algo así...
Para solucionarlo pones
en los 2
adoconeccion.CursorLocation = adUseClient
esto va antes de
MisReg.ActiveConnection = MiConexion
---------------------------
rsADO.CursorLocation = adUseClient
y esto va antes de
misreg5.ActiveConnection = MiConexion
Supongo que el mensaje de error que te aparece, dice que el conjunto de filas no acepta o no tiene marcadores algo así...
Para solucionarlo pones
en los 2
adoconeccion.CursorLocation = adUseClient
esto va antes de
MisReg.ActiveConnection = MiConexion
---------------------------
rsADO.CursorLocation = adUseClient
y esto va antes de
misreg5.ActiveConnection = MiConexion
Ya lo había averiguado, pero gracias porque era eso lo que fallaba, ahora tengo otro problema y es que al imprimir un informe me pide la contraseña de MS access y yo no le he puesto ninguna ¿tiene algo que ver el haber puesto adUseClient? Yo creo que sí porque no he tocado otra cosa.
Gracias. Te mereces el 5 y a ver si con esta es un 10, je je
Gracias. Te mereces el 5 y a ver si con esta es un 10, je je
Si para hacer consultas o sea para lo del primer problema no usaste la contraseña...
Es extraño que ahora te la pida...
Pero puede ser,
Que tengas el recordset abierto para mostrar los datos...
Y que quieras volver a abrirlo para imprimirlos... ese puede ser el problema
A mi nunca me causo eso haber agregado aduserclient...
Verifica eso que te acabo de decir,
fíjate si la base de datos tiene alguna protección...
Puedes cerrar el recordset que te muestra la consulta en el datagrid... sin actualizar este ultimo, para que siga mostrando los datos...
Y realizar la consulta otra vez, para poder tomar los datos para imprimirlo...
También puedes probar con aduseserv, ua que este tiene libre acceso...
Yo directamente imprimo los datos desde el grid. Por eso nunca me surgió este problema.
Prueba a ver como sale...
Es extraño que ahora te la pida...
Pero puede ser,
Que tengas el recordset abierto para mostrar los datos...
Y que quieras volver a abrirlo para imprimirlos... ese puede ser el problema
A mi nunca me causo eso haber agregado aduserclient...
Verifica eso que te acabo de decir,
fíjate si la base de datos tiene alguna protección...
Puedes cerrar el recordset que te muestra la consulta en el datagrid... sin actualizar este ultimo, para que siga mostrando los datos...
Y realizar la consulta otra vez, para poder tomar los datos para imprimirlo...
También puedes probar con aduseserv, ua que este tiene libre acceso...
Yo directamente imprimo los datos desde el grid. Por eso nunca me surgió este problema.
Prueba a ver como sale...
Respuesta de andresmaga
1
A mi me había pasado eso, probá poniendo cursorlocation = aduseclient en misreg y misreg5
Creo que así lo había solucionado
Y disculpame la demora, estaba en parciales
Creo que así lo había solucionado
Y disculpame la demora, estaba en parciales
Ya lo había solucionado con cursorlocation = aduseclient pero ahora tengo otro problema y es que al imprimir un iforme con crystal reports me pide la contraseña de la base de datos y yo he puesto ninguna ¿puede ser que no sea compatible el access 2000 y el crystal reports 4.6?. Porque si abro el informe desde crystal reports me pide también la contraseña y cuando le doy a cancelar dice que no reconoce el formato de la base de datos, no tengo ni idea de que puede ser y estoy estancada.
Gracias
Gracias
Exactamente, la versión original no lo soporta; bajate este archivo:
http://es.groups.yahoo.com/group/visualbasic-esp/files/access2000drivers.zip
Que son los drivers para access 2000; no los probé ya que yo uso crystal 8.5, pero deberían de funcionar...
http://es.groups.yahoo.com/group/visualbasic-esp/files/access2000drivers.zip
Que son los drivers para access 2000; no los probé ya que yo uso crystal 8.5, pero deberían de funcionar...