MoveNext et MovePrevious

Question

Salut,
Bon j'ai petit Problème avec la connection vb et Access2007,
Pour defiler vres suivant et Precedent
voici ma connection:

public Connexion As New Coonection
Public Records As New Recordset
Public Sql As String
Sql = m
Public Sub Maconnexion(Byval m as string)
Sql=m
Connexion.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & App.Path & "\Personne.Accdb"
Records.CursorLocation = adUseClient
Records.Open Sql, Connexion, adOpenDynamic, adLockOptimistic, adCmdText

' Pour Suivant
sql="Select * from Personne"
Maconnexion(Sql)
Records.MoveNext
if Records.EOF=False then
text1=Records!Nom
text2=Records!Age
end if
Records.Close
Connexion.Close

cs_Jack · Answer

Salut

Et quel est ce problème ?

-1- public Connexion As New Coonection
Et tu n'as pas d'erreur sur cette ligne ?
-2- Quand on ouvre une connexion à une DB, on vérifie ensuite si elle est bien ouverte. Voir Connexion.ConnectionState
-3- Tu appelles ta propre fonction Maconnexion depuis l'intérieur de cette même fonction : Ça doit donner des choses bizarre
-4- Avant de vouloir parcourir les enregistrements, on vérifie qu'il y a des enregistrements. Voir Records.RecordCount ou Records.EOF à condition de le mettre avant le MoveNext
-5- En général, on fait un MoveFirst avant de faire un MoveNext, ça parait logique ... si on veut commencer du début

Un minimum d'attention est requis pour programmer.
Mettre des lignes les unes derrière les autres ne suffit pas; il faut un petit peu les relire et les comprendre.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

acive · Answer

Salut jack,

Surtout avec les centaines d'exemples de gestion de bdd, contenus dans ce site...

Bonnes fêtes





CF2i - Guadeloupe
Ingénierie Informatique

MoveNext et MovePrevious

2 réponses

Votre réponse

Discussions similaires