Jump to content

Hide Input Password


Recommended Posts

#include <Crypt.au3>

Global $MyCompanyName = "Test"
Global $MyProgramName = TEESSTT"

Global $_HasUserAlreadyEnteredCorrectSerial = RegRead("HKCU\software\" & $MyCompanyName, $MyProgramName)

If @error Or $_HasUserAlreadyEnteredCorrectSerial <> 1 Then
    $_InputBox = InputBox($MyCompanyName, "Please Enter Serial Number")
    $AG5InputBox = _Crypt_HashData($_InputBox, $CALG_MD5)
    If $AG5InputBox <> "0x77777777777777777777777777777777777777" Then
        Exit MsgBox(0, 0, "Sorry Incorrect Serial")
    Else
        RegWrite("HKCU\software\" & $MyCompanyName, $MyProgramName, "REG_DWORD", 1)
    EndIf

EndIf

_StartOfProject()

Func _StartOfProject()
    MsgBox(0, $MyCompanyName, $MyProgramName)
EndFunc

 

How to hide passwor for this script.

Edited by J4m3sTH
Link to comment
Share on other sites

First of all so or so it will get bug when starting or comiling because in your the $MyProgramName was just = TEESSTT"

#include <Crypt.au3>

Global $MyCompanyName = "Test"
Global $MyProgramName = "TEESSTT"

Global $_HasUserAlreadyEnteredCorrectSerial = RegRead("HKCU\software\" & $MyCompanyName, $MyProgramName)

If @error Or $_HasUserAlreadyEnteredCorrectSerial <> 1 Then
    $_InputBox = InputBox($MyCompanyName, "Please Enter Serial Number","","#")
    $AG5InputBox = _Crypt_HashData($_InputBox, $CALG_MD5)
    If $AG5InputBox <> "0x77777777777777777777777777777777777777" Then
        Exit MsgBox(0, 0, "Sorry Incorrect Serial")
    Else
        RegWrite("HKCU\software\" & $MyCompanyName, $MyProgramName, "REG_DWORD", 1)
    EndIf

EndIf

_StartOfProject()

Func _StartOfProject()
    MsgBox(0, $MyCompanyName, $MyProgramName)
EndFunc

This would work and replace everything typed in with "#" so the Password shouldn't be seen what is being typed in.

Edited by RaiNote
  • C++/AutoIt/OpenGL Easy Coder
  • I will be Kind to you and try to help you
  • till what you want isn't against the Forum
  • Rules~

 

Link to comment
Share on other sites

  • Moderators

J4m3sTH,

Welcome to the AutoIt forums.

When you post code please use Code tags - see here how to do it.  Then you get a scrolling box and syntax colouring as you can see from RaiNote's post above.

M23

 

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

First of all so or so it will get bug when starting or comiling because in your the $MyProgramName was just = TEESSTT"

#include <Crypt.au3>

Global $MyCompanyName = "Test"
Global $MyProgramName = "TEESSTT"

Global $_HasUserAlreadyEnteredCorrectSerial = RegRead("HKCU\software\" & $MyCompanyName, $MyProgramName)

If @error Or $_HasUserAlreadyEnteredCorrectSerial <> 1 Then
    $_InputBox = InputBox($MyCompanyName, "Please Enter Serial Number","","#")
    $AG5InputBox = _Crypt_HashData($_InputBox, $CALG_MD5)
    If $AG5InputBox <> "0x77777777777777777777777777777777777777" Then
        Exit MsgBox(0, 0, "Sorry Incorrect Serial")
    Else
        RegWrite("HKCU\software\" & $MyCompanyName, $MyProgramName, "REG_DWORD", 1)
    EndIf

EndIf

_StartOfProject()

Func _StartOfProject()
    MsgBox(0, $MyCompanyName, $MyProgramName)
EndFunc

This would work and replace everything typed in with "#" so the Password shouldn't be seen what is being typed in.

Thank Sir!! 

Link to comment
Share on other sites

J4m3sTH,

Welcome to the AutoIt forums.

When you post code please use Code tags - see here how to do it.  Then you get a scrolling box and syntax colouring as you can see from RaiNote's post above.

M23

 

Sorry. i will do that next time. Thank

Link to comment
Share on other sites

  • Moderators

J4m3sTH,

Thanks - and when you reply, please use the "Reply to this topic" button at the top of the thread or the "Reply to this topic" editor at the bottom rather than the "Quote" button.  We know what we wrote and it just pads the thread unnecessarily.

M23

 

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

Melba you are right because it would look like :

Just stupid example :

#include <Crypt.au3>

Global $MyCompanyName = "Test"
Global $MyProgramName = TEESSTT"

Global $_HasUserAlreadyEnteredCorrectSerial = RegRead("HKCU\software\" & $MyCompanyName, $MyProgramName)

If @error Or $_HasUserAlreadyEnteredCorrectSerial <> 1 Then
    $_InputBox = InputBox($MyCompanyName, "Please Enter Serial Number")
    $AG5InputBox = _Crypt_HashData($_InputBox, $CALG_MD5)
    If $AG5InputBox <> "0x77777777777777777777777777777777777777" Then
        Exit MsgBox(0, 0, "Sorry Incorrect Serial")
    Else
        RegWrite("HKCU\software\" & $MyCompanyName, $MyProgramName, "REG_DWORD", 1)
    EndIf

EndIf

_StartOfProject()

Func _StartOfProject()
    MsgBox(0, $MyCompanyName, $MyProgramName)
EndFunc

 

How to hide passwor for this script.

First of all so or so it will get bug when starting or comiling because in your the $MyProgramName was just = TEESSTT"

#include <Crypt.au3>

Global $MyCompanyName = "Test"
Global $MyProgramName = "TEESSTT"

Global $_HasUserAlreadyEnteredCorrectSerial = RegRead("HKCU\software\" & $MyCompanyName, $MyProgramName)

If @error Or $_HasUserAlreadyEnteredCorrectSerial <> 1 Then
    $_InputBox = InputBox($MyCompanyName, "Please Enter Serial Number","","#")
    $AG5InputBox = _Crypt_HashData($_InputBox, $CALG_MD5)
    If $AG5InputBox <> "0x77777777777777777777777777777777777777" Then
        Exit MsgBox(0, 0, "Sorry Incorrect Serial")
    Else
        RegWrite("HKCU\software\" & $MyCompanyName, $MyProgramName, "REG_DWORD", 1)
    EndIf

EndIf

_StartOfProject()

Func _StartOfProject()
    MsgBox(0, $MyCompanyName, $MyProgramName)
EndFunc

This would work and replace everything typed in with "#" so the Password shouldn't be seen what is being typed in.

J4m3sTH,

Welcome to the AutoIt forums.

When you post code please use Code tags - see here how to do it.  Then you get a scrolling box and syntax colouring as you can see from RaiNote's post above.

M23

 

Thank Sir!! 

Sorry. i will do that next time. Thank

J4m3sTH,

Thanks - and when you reply, please use the "Reply to this topic" button at the top of the thread or the "Reply to this topic" editor at the bottom rather than the "Quote" button.  We know what we wrote and it just pads the thread unnecessarily.

M23

 

it would look so ^-^ but sometimes you Need to Quote someone, Melba :o.

  • C++/AutoIt/OpenGL Easy Coder
  • I will be Kind to you and try to help you
  • till what you want isn't against the Forum
  • Rules~

 

Link to comment
Share on other sites

  • Moderators

RaiNote,

but sometimes you Need to Quote someone

And as you can see in this very post, I have no objection to quoting sections of previous posts when necessary. My comment refers to using the "Quote" button to copy the whole post in every reply when there is no requirement to do so .

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

You're getting confused with quoting and acknowledging @RaiNote. If the OP wanted to acknowledge Meba23's previous post, a simple @<USERNAME> would have been suffice. Then Melba23 would received a notification regardless.

Edited by guinness

UDF List:

 
_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_ArrayFilter/_ArrayReduce_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 22/04/2018

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...