Sujet Précédent Sujet Suivant

VBA ACCESS extraction Données (Débutant)

toradoshi Messages postés 57 Date d'inscription lundi 2 avril 2007 Statut Membre Dernière intervention 3 janvier 2010 - 3 janv. 2010 à 04:45
toradoshi Messages postés 57 Date d'inscription lundi 2 avril 2007 Statut Membre Dernière intervention 3 janvier 2010 - 3 janv. 2010 à 04:50
Bonjour a tous,

Quelqu'un saurait-il m'expliquer ce qui ne tourne pas rond
dans ce bout de code : RS.recordcount = -1 alors que j'ai 25
lignes entrées dans ma table chambres ?
Merci !

Sub Test()

Dim Conn As Connection
Dim Rs As Recordset
Dim SQLstr As String

Set Conn = CurrentProject.Connection
Set Rs = CreateObject("ADODB.Recordset")

SQLstr = "SELECT * FROM Chambres"

Rs.Open SQLstr, Conn

MsgBox Rs.Fields("Nom_Hôtel"), , "recordcount=" & Rs.RecordCount

Rs.Close

Set Rs = Nothing

End Sub

1 réponse

Réponse 1 / 1
toradoshi Messages postés 57 Date d'inscription lundi 2 avril 2007 Statut Membre Dernière intervention 3 janvier 2010
3 janv. 2010 à 04:50
Je viens de trouver ... options open ...

merci
0

Discussions similaires

access vba recherche de donnee ds une table
yafisab -
yafisab -

2 réponses
Importation données excel vers access
rahmoun111 -
rach_zar -

2 réponses
Comment fonctionne la fonction FormulaR1C1
cs_razmokets -
wape -

2 réponses
fonction modulo en VBA
krisprolss -
Benouille -

2 réponses
Dernière cellule non vide d'une colonne
cs_falafala -
Luigi13013 -

5 réponses
Rejoignez-nous