SELECT

"Jaime Infante" escribió:

quiero hacer una consulta a una BD Access, para despues recorrerla
y mandar ciertos campos a un archivo ASCII, pero no se como hacerlo
Solo tengo la cadena de conexión y la consulta "SELECT" pero como ejecutar
esta consulta y como recorrer los registros no tengo ni idea

Hola, Jaime:

Deberás de utilizar los objetos incluidos en el proveedor .net para OleDb.
Aquí tienes un ejemplo:

Al principio de la clase Form, importarías el espacio de nombres OleDb:

Imports System.Data.OleDb

En cualquier botón de comando, escribirías lo siguiente:

Dim cnn As New OleDbConnection

' Configuramos la cadena de conexión para
' abrir la base de datos de Access
'
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Mis documentos;"

Try
' Creamos un comando para ejecutar la consulta SELECT
Dim cmd As New OleDbCommand
With cmd
' Construimos la consulta SQL para crear un archivo de texto
' delimitado en la carpeta C:\Mis documentos
'
.CommandText = "SELECT * INTO NombreArchivoTexto#txt " & _
"IN ''[TEXT;Database=C:\Mis documentos]" & _
"FROM NombreTablaAccess"

.Connection = cnn
End With

' Abrimos la conexión
cnn.Open()

' Exportamos los datos
Dim regAfectados As Integer = cmd.ExecuteNonQuery()
cmd = Nothing

MessageBox.Show("Número de registros afectados: " & _
regAfectados.ToString)

Catch ex As OleDb.OleDbException
MessageBox.Show(ex.Errors(0).Message)

Catch ex As Exception
MessageBox.Show(ex.Message)

Finally
' Cerramos la conexión
cnn.Close()
cnn = Nothing

End Try

Si deseas conocer cómo trabajar con el ISAM de Texto, consulta el siguiente
artículo:

Trabajar con los datos de un archivo de texto
http://mvp-access.com/softjaen/arti...t_isam.htm

Te hago saber que los ejemplos del artículo fueron escritos para utilizarlos
con Visual Basic 6.0, pero se pueden adaptar fácilmente a Visual Basic .net.

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.