Programación General > Visual Basic 6.0 e inferiores

 Utilización Del Order By

<< < (2/2)

cpmario:
Explica esta línea


--- Citar ---Set rs = mBASE.abrirtabla("Select * from Afiliado1 order by Apellido")
--- Fin de la cita ---

En especial

--- Citar ---mBASE.abrirtabla
--- Fin de la cita ---

 abrirtabla ¿que es?

 :comp:

lavi:
abrirtabla proviene d esta función que se encuentra en otro módulo llamado mBase; aqui cito el cód de abrirtabla... es un openrecordset..
El nombre de la bd access es Odontocop, de la tabla a abrir es Afiliado1, y del campo por el que quiero ordenar es Apellido.


--- Código: Text --- Public Function abrirtabla(tb As String) As Recordset    Set abrirtabla = BASE.OpenRecordset(tb, dbOpenTable)End Function   
y con respecto a la separación, es Afiliado1, sin espacio, por lo q entiendo no debería generar problemas...

el error que tira es el que cité en el mensaje anterior...

espero ayuda ... gracias.

cpmario:
La siguiente línea:


--- Citar ---   Set rs = mBASE.abrirtabla("Select * from Afiliado1 order by Apellido")

--- Fin de la cita ---

Y la función:


--- Citar ---Public Function abrirtabla(tb As String) As Recordset
   Set abrirtabla = BASE.OpenRecordset(tb, dbOpenTable)
End Function
--- Fin de la cita ---

No tienen la misma base de datos a abrir una dice mBASE y la otra BASE.
Te sugiero que elimines esa función, que solo crea confusión.

 :comp:

lavi:
OK, entiendo lo que decís pero  lo tengo que realizar trabajando con esa función; de igual forma yo ya tengo definido mBase como una Base al comienzo del módulo; ese no es el error... :)

Ta, buscaré otra forma, el tema es que no he podido encontrar un código de ORDENO para una colección que no demore mucho yyy ya hace tiempo ando en la búsqueda, por favor si alguien tiene uno me lo pasa...  :)

gracias..

Navegación

[0] Índice de Mensajes

[*] Página Anterior