Bonjour tout le monde,

Je voudrais ouvrir en lecture un fichier DBF en VB.

Ca fonctionne, mais seulement pour les fichiers qui n'ont pas de champ de type "mémo". J'ai un message d'erreur qui me dit que la table externe n'est pas dans le format attendu.

Avez vous une idée de ce que je devrais changer ?

Merci d'avance

Voilà le code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Dim Conn As ADODB.Connection
Set Conn = CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Temp\;Extended Properties=DBASE IV"
Set rsTemp = Conn.Execute("SELECT * FROM accounts.dbf")
 
If Not rsTemp.EOF Then
        'Do
            MsgBox (rsTemp(0))
            rsTemp.MoveNext
        'Loop While Not rsTemp.EOF
    End If