Programmation vb

jappa -  
william7007 Messages postés 344 Statut Membre -
Bonjour,
svp comment activer un mot de passe dans un programme vb6.0?
si on entre le vrai mot de passe dans un textbox, un bouton entrer sera valide sinon il sera rejeté automatiquement!
Configuration: Windows XP
Internet Explorer 7.0

5 réponses

  1. dna.factory Messages postés 19944 Date d'inscription   Statut Modérateur Dernière intervention   1 621
     
    bah tu fais un simple if assigné au bouton entrée qui vérifie la valeur entrée...
    0
    1. jappa
       
      je l'ai déja fais!
      voilà le code que j'ai introduit et ça pas marché:

      Private Sub Text1_Change()
      If Text1 = " greenday" Then
      Command1_Click()
      Form2.Show
      End Sub
      Private Sub Command2_Click()
      End
      End Sub

      avec command11 est entrer et command2 et quitter.
      Merci de m'aider svp!
      0
  2. Amine
     
    Bonjour

    Il faut générer le code par un événement valide;

    Command1_Click()
    if text1="mot de passe" then
    form2.show()
    end if
    end sub
    0
    1. jappa
       
      Désolée mais ça pas marché!
      il y a beaucoup des erreurs dans ce code et je trouve pas pourquoi?

      Private Sub Command1_Click()
      If Text1 = "mot de passe" Then form2.show()
      0
      1. lermite222 Messages postés 9042 Statut Contributeur 1 199 > jappa
         
        Bonjour tous
        tu a un espace avant le mot du test, comme ça cela ne fonctionnera jamais.
        If Text1 = "?greenday" Then
        A+
        0
  3. Amine
     
    bonjour ,
    si c'est possible tu peut m'envoyer le genre d'erreur qui se declanche l'ors de l'execution de ce code.
    0
    1. sarra
       
      Bonjour amine
      il m'afiche erreur de syntaxe tou court!
      0
  4. william7007 Messages postés 344 Statut Membre 46
     
    Bsr
    j'espere que je ne viens pas deranger la communauté. ben si je ne sort pas trop du sujet voilà ce que moi je propose de faire
    1. ici nous avons 2 feuilles form1 et form2 et deux butons cmdEntrer qui permet d'ouvrir form2 et cmdQuitter qui permet de sortir de m'application.
    au debut j'initialise mon bouton entrer à enabled=false soit (cmdEntrer.Enabled=false) pour le desactivé par defaut et là dans l'evenement change de la zone de texte Text1 j'applique ce que tu as dit. ben treve de bavardage voilà ce que j'obtient

    
    Option Explicit
    Dim motPasse As String
    
    
    Private Sub cmdEntrer_Click()
        Form2.Show
    End Sub
    
    Private Sub cmdQuitter_Click()
        End
    End Sub
    
    Private Sub Text1_Change()
        motPasse = "william"
        If Text1.Text <> motPasse Then
            cmdEntrer.Enabled = False
        Else
            cmdEntrer.Enabled = True
            cmdEntrer_Click
        End If
    End Sub
    
    


    lorsque je tappe "william" dans la zone de texte automatiquement le bouton entrer s'active et execute en meme temps le code qui se trouve dans la procedure cmdEntrer_click

    je ne sais pas si c'est ce donc vous avez besoin mais c'est ma façon de compredre ce que vous avez dit. faites moi signe si je me trompe.

    cdlt.
    0
    1. sarra
       
      bonjour
      non ça marche pas, il m'affiche erreur 424 en signalant en jaune cmdEntrer.Enabled = False
      aidez moi j'arrive pas à le résoudre svp!
      0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. william7007 Messages postés 344 Statut Membre 46
     
    Attend tu utilise VB6.0?
    et t'as donner les meme noms que moi ? à tes commandes ? il faut le verifier
    car le code foctionne tres bien chez moi.
    0