Would anyone know if it is possible to mask and input box with a password mask (*****)
my code is simple:
StrPswd = InputBox("Enter Password", "ENTER PASSWORD")
I was trying to mask the entry in ****** when the user enters the password.
Any ideas ??
Thanks
Hi Gurus.. :D
Need some wisdom.. ;) I got code behind buttons on my main switchboard form to enable passwords on the buttons.. I use the following code...
Private Sub Option2_Click()
On Error GoTo Err_Option2_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim Password1
Password1 = InputBox("Please Type the Password", "Password Prompt")
If Password1 = "password" Then
stDocName = "Main Form"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
End If
Exit Sub
Exit_Option2_Click:
Exit Sub
Err_Option2_Click:
MsgBox Err.Description
Resume Exit_Option2_Click
End Sub
My issue is that I need to mask the password, I know if it can be done by other methods, such as creating an inputbox on main form and setting the input mask property to Password and useing the button to make this visible.. etc.. However, a little bit of a mess.. the above code is simple and straight forward.. Is there any VB code that I can enter for an input mask for the inputbox :confused:
Hope you can help.. Thanks.. :D
Hi,
I have a text box where users input a person name as it appears on their bank account. This text box can only take alpha characters and no numbers or other characters except the "&" sign.
Please can some one help in to how i can mask this text box to only take text and nothing else, not even a combination of text and numbers can be accepted, please help!
Thanks in advanced!
I have a form based on a table where social security numbers are entered. I would like to enter a social security number on the form and once it's entered the first 5 digits are masked. When I go to the table I would like to see the complete social security number displayed. Is this possible? Can the control source on the form be formatted to hide the existing social security numbers as well so they don't have to be rekeyed with the new format?
Thank you in advance:cool:
Is it possible to mask data in a report? I have a report that contains a field for an ID number. Depending upon who is receiving the report only a partial ID number can be shown.
Example: Instead of showing ID#: 123456 the report can only show ***456.
I have the following expression as part of the recordsource for a report:
Is it possible to put a mask on the output of [phone1]? Ideally something like: (716) 555-5555 x1234
Code : phone1: [ContactNo1] & " " & [ContactNo1_ext]
Hey All!
Well I got a little problem and well... is simply but just I didnt know How.
When I pop op a inputbox and then i enter value I want this value got parse under a field
The code is the follow:
Private Sub SetPSW_Click()
Dim Boite As String
Dim PSWNew As String
PSWNew = PSW.Value
' The current password is sotre under this field PSW
Boite = InputBox("Entrez le nouveau mot de passe", "Nouveau Mot De Passe")
PSWNew = Boite
' Here I want then the value of Boite is putting on PSWNew
End Sub
Thx for help cuz i can't figure out how to do with a inputbox
Is there any way to change the password character that MSAccess uses (*) to
something different?
I want to use the lower case (L) from Wingdings (because it would look just
like the Windows XP password
Any Advice would be appreciated.
I like to apply this to a text box
MSAccess 2003 (2000 Database)
Windows XP
Thanks
Hi all,
I have an Input box that appears on certain criteria, using the folllowing code
Code:inputbox: myqty = inputbox("Please Enter Quantity!")If Nz(myqty, "") = "" ThenMsgBox "You must insert a value" GoTo inputboxElse![Issued] = myqty End If
Does anyone know how i can set the size of the Inputbox as at present it appears to big for what i want.
Thanks in advance
1E1V
Okay, I've been working on this database for weeks now, I'm almost done, there is a light at the end of the tunnel and my boss is anxious to implement the db as I'm only here for 3 more weeks and it MUST be completed, tested, error checked before I leave. So I'm running out of time FAST!
Okay, the problem is simple. I'm using a Data Access Page in Access to build a nice little front-end for my database for my co-workers to use. On this DAP (Data access page) I have an Input box that allows the users to browse their directory and select a file. I need to take the path/file name that pops up in the input box and just save it to the table. I can take care of all the other elements.
So, through DAP, how do I save the value in the inputbox into my table. Please, any help would be great! :eek:
I have an input box in which the user types in a password to enable the shift bypass, when the user types in the password it show it letter for letter, is there a way to mask the input so that it shows the characters as the traditional *
[CODE]strMsg = "Do you want to enable the Bypass Key?" & vbCrLf & vbLf & _
"Please key the programmer's password to enable the Bypass Key."
strInput = InputBox(Prompt:=strMsg, title:="Disable Bypass Key Password")CODE]
I am using an input box to find a Street name in a record using the following:
Dim rs As Object
Dim strCriteria As String
DoCmd.OpenForm "frmStreets"
strCriteria = InputBox("Please enter Street Name")
DoCmd.OpenForm "frmStreets"
[Code] .....
I know that if the search criteria is a number, then the .findfirst will work OK, as I am also using that, but I am not seeing where the " or ' or * should go so the correc
Hi,
I have created the following function in my datebase so that i could specify the date a query works from.
Option Compare Database
Function GetParmValue() As Date
GetParmValue = InputBox("Please enter the date you wish to update!?")
End Function
I have a button on a form that runs the query in question, there is also an identical query that needs to be ran using the same result from the input box but rather than it display the input box twice i wondered if there was a way i could use the result from one of the boxes with both queries!?
Here is the code for the button;
Private Sub bImport5_Click()
DoCmd.SetWarnings False
DoCmd.OpenQuery "Update"
DoCmd.OpenQuery "UpdateFuture"
DoCmd.OpenQuery "MoveFuture"
DoCmd.SetWarnings True
MsgBox "Files have now been updated to the specified date and moved to the Future Dated table!", vbOKOnly, "Update Complete"
End Sub
Any ideas guys?
Many thanks
Tim
I want a user to enter a number into an input box and then based on the number in this box a form will be opened with records associated only with that employee number. (All employee numbers are stored as text)The code below opens the form, but it is blank.
Private Sub cmdOpenAddKeys_Click()
Dim EmployeeNumber As String
EmployeeNumber = InputBox("Please Enter Employee Number:")
DoCmd.OpenForm "frmAddKeys", acNormal, , "[Forms]![frmAddKeys]![empno]=" & EmployeeNumber
End Sub
I am trying to get a record from tbl_new_accounts to tbl_closed_accounts, based on the number entered in a input box.
Code:
Dim StoreNumber As String
StoreNumber = InputBox("Please Enter The Store Number", "")
CurrentDb.Execute ("INSERT INTO Tbl_Closed_Accounts SELECT Tbl_New_Accounts.* From Tbl_New_Accounts WHERE (((Tbl_New_Accounts.Fld_Store_Number)=" & StoreNumber & "));")
Instead of using an update query, so my Audit Trail will continue to update correctly, I'd like to use an input box and run a function that performs much like an update query.
My problem is, only one out of 4 records updates correctly.
Code:
Me.txtTranTo = InputBox("Enter Location Transferring To:", "Location Transferring To", "")
Me.txtTranFrom.Value = Me.Location 'Old location
Me.Location.Value = Me.txtTranTo 'New location
The txtTranTo and txtTranFrom are unbound text boxes.
EDIT: Forgot to mention that this is in a continuous form.
How can I determine if the InputBox Cancel button was clicked?
View 4 Replies View Related