Estoy intentando conectarme con una base de datos .dbf, pero no puedo ver los
datos el codigo es mas o menos así:
Dim Cont As New OLEDBConnection
Dim Da As New OleDbDataAdapter
Dim Cmd As New OleDbCommand
Dim Ds As New DataSet
Dim StrQuery As String
Cont.ConnectionString = ""
StrQuery = "SELECT * FROM 'E:\NVC\NVCITEM.DBF'"
Da.SelectCommand = Cmd
Da.SelectCommand.CommandText = StrQuery
Da.SelectCommand.CommandType = CommandType.Text
Da.SelectCommand.Connection = Cont
Try
Cont.Open()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
Try
Da.SelectCommand.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
Cont.Close()
Da.Fill(Ds, 0)
Me.DataGrid1.DataSource = Ds.Tables(0)
Quisiera saber cual es el problema y como puedo resolverlo.
Gracias
Leer las respuestas