begin process at 2012 02 16 16:54:32
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

J'AI BESOIN D'AIDE !!!! :)

 > 

Bouton suivant, précédent


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Bouton suivant, précédent

lundi 5 avril 2004 à 16:35:35 | Bouton suivant, précédent

Nicocom

salut

j'ai fait un bouton suivant et précedent pour passer d'un enregistrement dans un data à un autre

je voudrais que quand je suis sur le premier enregistrement le bouton précédent soit inactif et pareil pour le dernier enregistrement le bouton suivant devra etre inactif.

j'ai réussi a faire que rendre inactif un bouton quand je suis sur l'enreg avant le premier

voici mon Code:

Private Sub datadde_Reposition()
....
If datadde.Recordset.BOF Then
cmdsuivant.Enabled = True
cmdprecedente.Enabled = False
ElseIf datadde.Recordset.EOF Then
cmdsuivant.Enabled = False
cmdprecedente.Enabled = True
Else
cmdsuivant.Enabled = True
cmdprecedente.Enabled = True
End If
....
End Sub


et voila ce qu'il y a dans mes boutons précédent et suivant :

Code:
Private Sub cmdprecedente_Click()
On Error Resume Next
If (Not datadde.Recordset.BOF) Then
datadde.Recordset.MovePrevious
End If
End Sub


Code:
Private Sub cmdsuivant_Click()
On Error Resume Next
If (Not datadde.Recordset.EOF) Then
datadde.Recordset.MoveNext
End If
End Sub

mais je voudrais pas pouvoir aller ni avant le 1er enreg ni après le dernier enreg

merci de votre aide
lundi 5 avril 2004 à 17:34:43 | Re : Bouton suivant, précédent

3Pom

Membre Club

Utilise la propriété absolutePosition du recordset.

A chaque clic sur precedent et suivant tu verifit si

if datadde.Recordset.AbsolutePosition=0 then
'Tu est sur le 1er enreg

If datadde.Recordset.AbsolutePosition=datadde.recordset.Recordcount - 1 then
'Tu est au dernier enreg


Cette discussion est classée dans : bouton, end, recordset, enabled, datadde


Répondre à ce message

Sujets en rapport avec ce message

bouton qui arrette le traitement [ par zekmek ] il me faudrait un bouton qui arrette le traitement, car la j'ai bouton annuler tout bete :Private Sub Ann_Click()EndEnd Submais il ne marche que quand Loop [ par Michele ] Bonjourj'essaie d'éffectuer plusieurs boucles les unes derriere les autres, mais avec le code qui se trouve ci-dessous la premiere s'effectue bien mai Probleme de connection avec Winsock [ par Luigi-Qc ] Je veux programmer un petit chat fonctionnant avec winsock, mais il ne veut pas se connecté.En mode local (2 chat.exe ouvert sur le meme ordinateur) s Delete dans un RecordSet [ par Charlie ] Allo... j'essaie d'effacer, dans ma table Data, tous les enregistrements dont le champ Name correspond a un certain nom.A toute les fois qu'il arrive evenement click sur un bouton [ par startx25 ] ce code donne le caption du formulaire et moi je voudrais qu'il donne le caption du bouton sur lequel on a pressé Private Sub Command1_Click() insert [VB]Moteur de recherche foireux :x [ par Nixo ] bah voilà je comprend pas pourquoi ce code ci-dessous ne marche po Si vous pouviez me donner un p'tit coup de pouce ce serait vraiment sympa Cod AjOuTeR DeS DoNnEeS DaNs UnE BaSe ViA Un TdBgRiD [ par Nicos77 ] Je suis desperer !!!Voici mon code entierOption ExplicitDim l_cn_securite As ADODB.ConnectionDim l_recordset As ADODB.RecordsetPrivate Sub cmdDelete_C Data et deplacement [ par sbouquet ] Bonjour a tous,Alors j'explique, j'ai 2 combobox, une qui a une liste des noms des tables de ma db et l'autre qui, lorsqu'on appuie sur un bouton (com Changement grace aux dates sur un recordset [ par cherif747 ] bonjour tout le monde,Je suis entrain de fr un prog pour mon club de foot. Il souhaiterait que grâce à un bouton de commande, tous les joueurs passent VB + Excel : ajouter / modification / suppression de ligne qui ne fonctionne pas [ par Nixo ] Bonjour,comme le souligne le titre du sujet, je rencontre un problème au niveau de l'édition de la base.Pour être plus clair : Je navigue dans la base


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 3,760 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales