Sección de códigos , trucos y ejemplos para visual basic


317 - Generar un archivo CSV con los datos de un recordset ADO

<Volver> - Anterior - Siguiente



 

 

 

Contenido:

 

 

 

 


Ejemplo 1

Ejemplo que utiliza el método GetString del objeto recordset de Ado para crear un archivo Csv a partir del contenido del recordset

Para obtener los datos con este método , solo hay que asignar a una variable String los datos devueltos por el método GetString

Al método GetString hay que indicarle el delimitador ( en este caso la coma ), y el salto de carro ( VbCrlf ) para los registros

 

 

Csv = Recordset.GetString(adClipString, -1, ",", vbCrLf, "(NULL)")

 

El siguiente ejemplo utiliza la base de datos Biblio.mdb que se instala con Visual basic. Luego llena un recordset con todos los registros de la tabla Authors, y genera el archivo csv en el Directorio c:\ con el nombre archivo.csv

Agregar la referencia Microsoft Ado

 

Código fuente en el formulario

 


Ejemplo 2

Este es otro ejemplo , pero a diferencia del anterior, para generar el archivo con los datos, se recorre el recordset fila a fila en un bucle.

La salida del archivo csv queda de la siguiente forma:

 

 

A la función se le debe enviar como argumento, el recordset y la ruta del .csv

 

Código fuente en el formulario

 

 

Y por ejemplo para llamarla:

 


Recursos visual basic 6.0

Recursos vb.net



Buscar en Recursos vb