Problemas con DBF y VB .NET 2003

12/03/2005 - 01:25 por Pablo Brun | Informe spam
Quisiera saber como conecto una base de datos (.DBC) y sus
respectivas tablas (.DBF) a una aplicacion de VB .NET 2003,
sigo los mismo pasos que seguiria con una base de Access,
la aplicacion muestra los datos de una DBF, mas no logra
Actualizarlos y no puedo hacer ni eliminaciones... pues por
que NO GENERA LOS COMANDOS DE ACTUALIZACION (UPDATE) del
objeto Adapter, mientras que con Access lo enlaza a la
perfeccion y genera cada uno de los comandos (INSERT,
UPDATE, DELETE, SELECT), ¿alguien que pudiera responder por
que no genera los comando de actualizacion PARA UN DBF?
.
 

Leer las respuestas

#1 José Ramón
12/03/2005 - 10:34 | Informe spam
No se porque, yo he usado DBF's y no tengo problemas, por lo menos
eliminando datos y agregando nuevos (las modificaciones no las he probado)

Aquí unos ejemplos:

Conectar a la base de datos:

Public Function ConectarBD_DBF(ByVal Directorio As String, ByRef Con As
OleDb.OleDbConnection) As Boolean

Dim CadenaConexion As String

CadenaConexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +
Directorio + ";Extended Properties=dBASE IV;User ID=Admin;Password="

Try

Con = New OleDb.OleDbConnection(CadenaConexion)

Catch e As Exception

MessageBox.Show("Error al crear la conexión:" & vbCrLf & e.Message)

Return (False)

End Try

Return (True)

End Function

InsertCommand:

Dim cmd As New OleDbCommandBuilder(Adaptador)

Try

Adaptador.UpdateCommand = cmd.GetInsertCommand

Adaptador.Update(Datos, NombreTabla)

Datos.AcceptChanges()

Return (True)

Catch ex As Exception

Debug.WriteLine(ex.Message)

MessageBox.Show("Error Guardando datos:" & vbCrLf & ex.Message, "Error",
MessageBoxButtons.OK, MessageBoxIcon.Exclamation)

Return (False)

End Try

Preguntas similares