Bonjour a tous,
j'ai un bouton précédent et suivant qui permettent le déplacement dans un recordset par l'intermédiaire de movenext/previous. tout marche bien sauf qu'il parcours le recordset depuis le début et j'aimerais qu'il le fasse à partir d'une position définie merci
si quelqu'un as un code source à envoyer je le remercie d'avance

S'il te plaît, arrête de poster plusieurs fois pour un même problème:
 
http://forum.hardware.fr/hardwaref [...] 1991-1.htm
http://forum.hardware.fr/hardwaref [...] 2038-1.htm
 
Si tu ne reçois pas de réponse, réponds, toi-même, à ton message et il va remonter dans la liste.
Si personne ne répond, c'est, peut-être, que tu ne donnes pas assez de détails. Qu'as-tu déjà écris et quel est le résultat?
 
Edit --> Pense aussi à dire avec quelle application tu travailles (VB6, VB.NET, Access, version)
ReEdit --> Autant pour moi, j'avais pas vu le titre, désolé...

ok merci
c'est du vb6 base de donnée, il me semble que c'est sql server
peut on supprimer les anciens messages? car le probleme n'est pu le meme tout a fait

Normalement, si tu as créé un message et qu'il n'y a pas trop de réponses, tu as un bouton pour le supprimer.

Tout marche bien mais j'aimerai que lorsqu'on sélectione une visite, par exemple la 10ème et qu'on fasse visite suivante qu'il affiche la 11ème et qu'il ne reparte pas à 0
je suis débutant en programation donc si quelqu'un peut m'aider merci
 
Voici le code :
 
 
Private Sub next_Click()
 
 
 
 
ViNum = rsvi2.Fields(0)
NumPa = rsvi2.Fields(6)
rsvi2.MoveNext
 
If (rsvi2.EOF) = False Then
   
  'Date de la visite
    LabelPh.Caption = "Photo(s) de la Visite du " & rsvi2.Fields(1)
     
    'Numéro de la visite
     
    num1 = rsvi2.Fields(0)
     
   ' affecte au recordset rsPaVi le patient qui a pour numero num1 et ses visites
    Call recherche_PaViPhMa_ViNum(num1, rsPaViPhMa)
    Call affiche_miniature
ElseIf rsvi2.EOF = True Then
MsgBox "C'est la dernière visite"
rsvi2.MovePrevious
 
End If
 
End Sub