Extraire une donnéeRésolu

Question

Bonjour,

j'ai une certaine expérience avec VB, mais je n'ai jamais travaillé avec de base de données. J'ai le code suivant qui me pose problème.


Public Class Form2

    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim con As New ADODB.Connection
        Dim rst As New ADODB.Recordset


        con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\allo.mdb"
        con.Open()

        rst.Open("SELECT * FROM Compte", con, ADODB.CursorTypeEnum.adOpenUnspecified, ADODB.LockTypeEnum.adLockOptimistic)

        With rst
            If .RecordCount <> 0 Then
                .MoveFirst()
                MsgBox(rst.RecordCount)

                Do While Not .EOF
                    MsgBox(rst!nombre) *****
                    .MoveNext()
                Loop
            Else
                MsgBox("Rien trouvé")
            End If
        End With

        rst.Close()
        con.Close()
        rst = Nothing
        con = Nothing
    End Sub
End Class

J'ai mis ***** à la ligne que me pose problème. Avec ce que j'ai vu sur divers site, c'est la façon d'extraire une donnée, mais ça ne marche pas, car j'obtiens l'erreur suivante :

La résolution de surcharge a échoué, car aucun 'Fields' accessible n'accepte ce nombre d'arguments.

Je présume qu'il y a quelque chose que je n'ai pas compris à quelque part. Merci de m'éclairer sur ce sujet.

Desgui

Renfield · Accepted Answer

prefere la notation :

    rst.Fields("nombre").Value
à
    rst!nombre

évite de faire un SELECT * si tu souhaites n'extraire qu'un champ (cible ta requete)



Renfield - Admin CodeS-SourceS - MVP Visual Basic

Calade · Answer

Bonjour,

Et surtout poste dans la bonne catégorie. C'est du .NET, d'où peut-être ton erreur, celui-ci n'acceptant plus les propriétés par défaut.

C'est la correction que te suggère Renfield.


Calade

desgui1 · Answer

Merci pour vos réponses. Ça marche à présent.

Extraire une donnée

3 réponses

Votre réponse

Discussions similaires