Machsupport Forum

Mach Discussion => VB and the development of wizards => Topic started by: Julie on November 23, 2015, 07:27:37 PM

Title: password button
Post by: Julie on November 23, 2015, 07:27:37 PM

Hello,

I'm making password question button in Mach3.

When user click the button, then password message box pops up.

And when user enter password, it displays as it is.

I want to display asterisk "******".

Could you tell me how to do this?


<Example code>

If Question("Password?") = 12345 Then
DoOemButton(122)
End If

Title: Re: password button
Post by: matrix on December 04, 2015, 08:17:00 AM

Sub main
Begin Dialog joe 60,60,140,100,"Acesso a Área Restrita"
OKButton 50,50,40,12
CancelButton 50,70,40,12
Text 10,10,120,12, "Type a Password",.Pin1
TextBox 50,30,40,12,.Pin,32
End Dialog


Hello, I also looked for it everywhere, after a long time searching, I found.

Exemple:


Dim Dlg1 As joe
Button = Dialog (Dlg1)
If Button = 0 Then Exit Sub
If Dlg1.Pin = "123" Then
DoOEMButton (5)
MsgBox "pass ok"
Else
MsgBox "pass error"
End If
End Sub


Good luck.

Title: Re: password button
Post by: BR549 on December 04, 2015, 08:47:58 AM

Thank You Matrix. THAT will be a great addition to my code file (;-). I had looked a long time as well but never found it.

(;-) TP