Bonjour,
J'ai encore un petit problème en VB.
J'ai deux form : form1 et pass2
Lorsque que je clique sur un bouton dans le form1, il lance pass2 à une condition sinon, l'exécution se poursuit.
Dans pass2, je demande un mot de passe.
Et lorsque le mot de passe est correct, il modifie la condition pour le lancement de la suite de la sub dans form1.
Or, comment relancer la sub dans form1 depuis la sub de pass2.
Je vous copie les codes ci dessous :
DANS FORM1 :
If Pmail1.Visible = False Then 'ici je vérifie la condition
pass2.Show() 'condition respectée : lancement de pass2
Exit Sub 'Arrêter l'execution
End If
'suite du code ici !
DANS PASS2 :
'execution après que le mot de passe soit entré dans un textbox
Dim password As String
Dim filer As System.IO.StreamReader
Dim myreadline As String
Dim myreadline2 As String
Dim filer2 As System.IO.StreamReader
'recherche du fichier1
filer = My.Computer.FileSystem.OpenTextFileReader(My.Computer.FileSystem.CurrentDirectory & "\password1.txt")
'lecture du fichier1
myreadline = filer.ReadLine
'recherche du fichier2
filer2 = My.Computer.FileSystem.OpenTextFileReader(My.Computer.FileSystem.CurrentDirectory & "\password2.txt")
'lecture du fichier2
myreadline2 = filer2.ReadLine
password = myreadline & myreadline2
If pass.Text = password Then
Form1.Pmail1.Visible = True
'C'EST ICI QUE JE SOUHAITE RENVOYER A L'EXECUTION DU FORM1
Me.pass.Text = ""
Me.Hide()
Else
Me.pass.Text = ""
Me.Hide()
End If
Merci de ne pas juger la mauvaise sécurité du mot de passe ! Je compte changer tout ça plus tard :)