Visual Basic - Error en conexion a datos

Life is soft - evento anual de software empresarial
 
Vista:

Error en conexion a datos

Publicado por aldo (111 intervenciones) el 31/01/2007 15:27:42
Hola...
tengo en el modulo bas la siguiente conexion...

Global dbAccess As New Connection

Sub AbrirBase()
On Error GoTo ControlError

Set dbAccess = New Connection

dbAccess.Provider = "Microsoft.Jet.OLEDB.4.0"
dbAccess.ConnectionString = "Data Source=c:\user2\audkin"
dbAccess.Properties("Extended Properties") = "dBASE 5.0;"
dbAccess.Open

Exit Sub

ControlError:
Select Case Err.Number
Case -2147467259
MsgBox "Compruebe que exista el archivo de datos .mdb o que esté ubicado en la carpeta correspondiente.", vbCritical
End
Case Else
MsgBox "Error : " & Err.Number & ". " & Err.Description ' Evalúa el número de error.
End
End Select
Exit Sub
Resume
End Sub

y el formulario donde creo el recordset es el siguiente

Dim rsAyu As ADODB.Recordset

Set rsAyu = New Recordset
rsAyu.Open "select * from prestad where numero<>0 order by numero", dbAccess, adOpenStatic, adLockReadOnly

me tira dos errores distintos, a veces uno y otras veces el otro...
los errores son los sig.

"Error: -214746 7259. El sistema operativo no admite la secuencia de ordenacion seleccionada."

"Error: -2147217904. No se han especificado valores para algunos de los parametros requeridos"

ahora, no tengo ni idea porque a veces me sale uno y en otras ocaciones me sale el otro.
Solo quiero tomar una tabla en dbf y mostrarlos en una grilla con msflexgrid.

si alguien me puede ayudar, lo agradecere.
saludos
Aldo
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 en conexion a datos

Publicado por carlos pulga (136 intervenciones) el 31/01/2007 17:03:29
en la linea
rsAyu.Open "select * from prestad where numero<>0 order by numero", dbAccess, adOpenStatic, adLockReadOnly

pon el cero entre comillas y la funcion entre parentesis, ponla asi
rsAyu.Open "select * from prestad where (numero<> " 0 " order by numero)", dbAccess, adOpenStatic, adLockReadOnly

prueblao asi, suerte XD
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:Error en conexion a datos

Publicado por aldo (111 intervenciones) el 31/01/2007 18:10:40
Carlos,
no anduvo...

gracias por tu tiempo de todos modos!

un saludo
Aldo
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:Error en conexion a datos

Publicado por carlos pulga (136 intervenciones) el 31/01/2007 18:15:45
ponlo asi
rsAyu.Open "select * from prestad where (numero<> " 0 " )", dbAccess, adOpenStatic, adLockReadOnly

y luego ordenalo con otra funcion
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:Error en conexion a datos

Publicado por aldo (111 intervenciones) el 31/01/2007 18:18:23
sí, tambien lo habia probado asi y tampoco me funciono...
no se que puede ser...

mil gracias por tu insistencia en ayudarme

un saludo
Aldo
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