Mostrando las entradas con la etiqueta acccess. Mostrar todas las entradas
Mostrando las entradas con la etiqueta acccess. Mostrar todas las entradas

viernes, 2 de agosto de 2013

ROWNUM en ACCESS (solución)

Al parecer muchos han buscado este tema y si bien ya había puesto una posible solución creo no fue la mejor solución para todos.

Pues bueno, creo que esta les funcionará mejor.

Primero, tengo esta tabla:


Así, sin más, solo 2 columnas con datos cualesquiera de tipo texto.


Ahora, en Access creamos 2 funciones públicas:


Declaran esta variable de tipo pública (ID)



Aquí el código para que lo copien y peguen:

Public Function RN(valor As Variant) As Double
    If valor = 1 Then
        ID = 0
        RN = ID
    End If
End Function

Public Function Rownum(valor As Variant) As Double
   ID = ID + 1
   Rownum = ID
End Function

Y solo queda usarlo.... desde código VB el ejemplo:



Bueno, dentro de la función test() hago un primer Select y tal cual me traigo todo de la tabla y lo pinto en la ventana del debug, excepto la primera columna, que el dato no nos sirve para nada pero es necesario para que la función Rownum funcione correctamente.

En el segundo Select hago un filtro por datos y el Rownum que me genera por cada renglón es correcto.

Bueno, este ejemplo es generándolo por código, pero también por consulta en Access


Y el resultado


Pues bueno, espero sea esto lo que realmente necesitan.

Comentarios, mejoras o sugerencias ... 





viernes, 6 de julio de 2012

VisData

Este programa ya es conocido, puedes acceder a diferentes bases de datos, incluso teniendo controladores de ODBC, prácticamente puedes entrar a cualquier base de datos.


Te permite editar propiedades de tablas, índices, creación de los mismos, consultas, etc..

Específicamente sobre Microsoft Access, puedes crear, modificar, reparar, comprimir, etc... prácticamente todas las herramientas que Ms Access trae para la administración de bases de datos.



Esta por demás comentar que se tendría un perfecto ejemplo de cómo acceder a bases de datos utilizando diferentes medios.

Descarga aquí el código fuente, la contraseña es: codificalo

Espero les sea de utilidad.

miércoles, 4 de julio de 2012

Envío de eMail

Con este programa podrás enviar correos electrónicos sin necesidad de usar tu cuenta de correo original, podrás usar cualquier cuenta de correo como Remitente y cualquier cuenta de correo como Destinatario. No es necesario que exista la cuenta de correo del Remitente.


Descarga aquí el código fuente. La contraseña es: codificalo

Espero les sea de utilidad.


Translate