Conectar a archivos DBF

A través de Oledb
"Jorge Clemente" escribió en el mensaje
news:

Estoy desarrollando un proyecto en Visual Basic .Net.., y se me ha dado la
necesidad de conectarme a archivos DBF, solo para extraer su
informacion..,
y luego sigo trabajando con mi SQL...

La pregunta es, como puedo hacer la conexion a un archivo DBF...?

Gracias,

Perdon a traves de una odbc

"Jorge Clemente" escribió en el mensaje
news:

Estoy desarrollando un proyecto en Visual Basic .Net.., y se me ha dado la
necesidad de conectarme a archivos DBF, solo para extraer su
informacion..,
y luego sigo trabajando con mi SQL...

La pregunta es, como puedo hacer la conexion a un archivo DBF...?

Gracias,

Y como es eso ?
Me podrias indicar la sintaxis o algun link donde pueda encontraresa
informacion.

Saludos,

"Jorge Clemente" preguntó:

como puedo hacer la conexion a un archivo DBF...?

Hola, Jorge:

Si por DBF entendemos archivos de dBASE, una vez que tengas importado el
espacio de nombre System.Data, el siguiente ejemplo te muestra cómo abrir un
archivo de dBASE utilizando el proveedor de datos OLE DB .NET, y mostrar los
datos en un control DataGrid:

Dim cnn As New OleDb.OleDbConnection
Dim oCommand As New OleDb.OleDbCommand
Dim oDataAdapter As OleDb.OleDbDataAdapter
Dim oDataSet As New DataSet

' Configuramos la cadena de conexión, indicando únicamente
' la carpeta donde se encuentra el archivo de dBASE
'
cnn.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source = C:\Mis documentos;" & _
"Extended Properties=dBASE 5.0"

' Abrimos la conexión
'
cnn.Open()

' Configuramos el objeto Command, donde especificaremos
' el nombre del archivo de dBASE
'
With oCommand
.CommandText = "SELECT * FROM Archivo#dbf"
.Connection = cnn
End With

' Creamos un nuevo objeto DataAdapter, asignándole el objeto Command
'
oDataAdapter = New OleDb.OleDbDataAdapter(oCommand)

' Rellenamos el objeto DataTable definido con el nombre de la tabla
'
oDataAdapter.Fill(oDataSet, "NombreTabla")

' Configuramos el control DataGrid
With DataGrid1
.DataSource = oDataSet
.DataMember = "NombreTabla"
End With

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

End Sub

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.