I have a form that includes a text box for a password. The passord works fine on a local table, but when I upload the form to the web the password is visible. How can I format the text box so that the text box shows "*******" on the web form?
View RepliesI have a combobox on my form called TypeOfBusiness, with fields including Corporation, Education, Industry, Non-Profit. In order to make a second combobox called IndustryClassification appear when Industry is selected from the TypeOfBusiness combobox, I have used the following code:
Code:
Private Sub Form_Current()
If Me.TypeOfBusiness = "Industry" Then
Me.IndustryClassification.Visible = True
Else
Me.IndustryClassification.Visible = False
[Code] .....
It works just fine. However, when a user selects both, say, Industry and Education, the IndustryClassification combobox will not appear. What code I can use to ensure the IndustryClassification box will appear regardless if another box is checked in addition to Industry? I am wondering if it has to do with the Column attribute.
hey, i have been designing a database and i have made a switchboard with forms on it and i have another switch board with backoffice functions which i only want staff with admin rights to be able to get into. i am using the code below but what i need to figure out is how to select any Password from the "Password" field where users have "Admin" in their "Access Rights" column. if that makes sense to any of you!
heres the code
Private Sub cmdOpenEmpForm_Click()
'Attached to On Click event of cmdOpenEmpForm
Dim strPasswd
strPasswd = InputBox("Enter Password", "Restricted Form")
'Check to see if there is any entry made to input box, or if
'cancel button is pressed. If no entry made then exit sub.
If strPasswd = "" Or strPasswd = Empty Then
MsgBox "No Input Provided", vbInformation, "Required Data"
Exit Sub
End If
'If correct password is entered open Employees form
'If incorrect password entered give message and exit sub
If strPasswd = "Graham" Then
DoCmd.OpenForm "frmEmp", acNormal
Else
MsgBox "Sorry, you do not have access to this form", vbOKOnly, "Important Information"
Exit Sub
End If
End Sub
at the moment the password is just set to Graham, any help would be fantastic
I have a Main Form with a Sub-Form, the sub-form is base off a query. on the sub-form i have 8 controls, one of them is "Status' and "Process" and "Review" My Main Form have a Refresh command that refreshes the data in the sub-form.
What i am trying to do is make the "Process" Control only visible is "Status" is a certain status and "Review" visible if "Status" is something else. what i have done works correctly On Open. I run into and issue on the refresh command. I get Run-time error '2165' "You can't hide a control that has the focus"
Code:
If Forms!Main_Form.[Name subform]!Status = "Ready" Then
Forms!Main_Form.[Name subform]!Process.Visible = True
Forms!Main_Form.[Name subform]!Review.Visible = False
ElseIf Forms!Main_Form.[Name subform]!Status = "Reviewing" Then
Forms!Main_Form.[Name subform]!Review.Visible = True
Forms!Main_Form.[Name subform]!Process.Visible = False
End If
I have done similar with a main form and making sub-form visible or not based on a control on a main form and that has worked perfectly. I am not sure how the control is getting focus and cause the error.
I have a form with four subforms set up in a tabs on the form. In the subforms I have a copuple of command buttons which enable/make visible fields when they are clicked (see previous posts but for eg) - if a height and a weight are added in two separate boxes a calculation is done and then a command button pressed to make visible the (label) which shows the mass index the patient falls into. My problem is that the label is then retained so if I click out of the form and re-enter with a new patient then the height and weight boxes are clear but the label from the previous patient remains.
I tried to put the code
Private Sub Form_Load()
If PtWeight = Null And PtHeight = Null And Text60 = Null Then
Label106.Visible = False
Label101.Visible = False
Label177.Visible = False
Label122.Visible = False
Label123.Visible = False
End If
End Sub
in both the open and on load event of the main form (not the subform) but it doesn't help. Any ideas?
(When should code be put on the main form and when on the subform?)
Several years ago, my colleague and I built some databases (using Access 97, if it matters). We are both responsible for the maintenance of them.
Recently, the hard drive in my PC crashed, and the IT group replaced it. Now, when I open one of the databases, I cannot see all of the Forms, Tables, etc. Thinking the database had been corrupted, I asked my colleague to open it on his machine. Everything was there, and can be viewed from his PC.
All was well until my hard drive was replaced. Has anyone seen this before? Any help will be greatly appreciated.
I have a table that records a list of dates using the first of the month in short date format (01/01/2011) and I have the following query
Code:
SELECT Format([dateworked],"mmm yyyy") AS Monthyear, Table_dateworked.dateworked
FROM Table_dateworked;
This query is the source for a combo box so it stores the actual date but the formatted date is visible.An additional complication (if it has to be) is that I have two combo boxes and I want to make sure the finish date is later than the start date, so I have a similar query which only returns later dates than the start date.
What I would like to do instead is to remove the combo box and to get the user to type in the month and the year in the "MMM YYYY" format, default the day to the first of the month and make it invisible.How difficult would this be? Would it be easier to enter the date in short format and change the format using the after update event?
I would like to have a checkbox be visible only if a textbox (Text246) has text in it.
Code:
Private Sub Text246_AfterUpdate()
Me.Check275.Visible = Text246
End Sub
I've got a memo field on a form where the name is TextEXTRA
The Control Source for TextEXTRA is EXTRA.
I've got a box called BoxSHOW (Visible = No)
As I browse through records or find records, I want the box to become visible when there is something in the EXTRA field and become invisible when the EXTRA field is empty. This is what I've tried .....
Private Sub Form_Current()
If EXTRA Is Not Null Then
BoxSHOW.Visible = True
End If
End Sub
I tried many variations on the first line such as ...
Me.EXTRA "EXTRA" TextEXTRA
but I always get errors.
I can do this if there is one record: ie
Private Sub Form_Open(Cancel As Integer)
If Me.field1 ="DontShow" Then
Me.cmd_splt.Visible = True
Else
Me.cmd_splt.Visible = False
End If
End Sub
This creates a button that masks my radio button i.e. hides it. However this only works on single forms.
I need it to be different for each record in a continuous form.
I am putting the code in the "OnOpen" property. Maybe that's my problem?
I've also tried conditional formatting but it wont over-ride a transparent text box.
i have a label and a combobox (the combobox is invisibile). in a form.
how do i make the combobox visibile when i click on the label?
I need to have a subform that shows up smack dab in the middle of my main screen when visible - which is what I want - but only based on a specific value of a control on the main form. Specifically, if a control's value is "See Spreadsheet", I want the subform visible front and center as it contains the link to the server location for that specific record. If the control's value is not "See Spreadsheet", I want the form to be invisible.
My code:
If Me.BudgetsFacultyAccountNumber = "SEE SPREADSHEET" Then
Me.frmMsgBoxUpdateSpreadsheet.Form.Visible = True
Me.BudgetsFacultyServerLocation.Visible = True
Else:
Me.frmMsgBoxUpdateSpreadsheet.Form.Visible = False
Me.BudgetsFacultyServerLocation.Visible = False
End If
The red lines result in an MS VBA error: "Compile error: Method or data member not found."
I've tried referencing that subform a hundred different ways, but I can't get it to work.
My company has a new database that we will use to track PTO (paid time off/vacation), including the submission/approval process. Not everyone should have access to the approval dashboard as that should be restricted to only managers. Everyone will have the same basic form so that they can see their PTO history, hours remaining to be used, etc.
What I want to do is have a button on the form that is visible only if the person is a manager. The button will open the PTO approval form. How can I make a button visible/invisible based on user access levels?
I have a form where i select via a combo box if a product has been inspected, if it has, additional controls are then made visible.
If Me.Inspection_Completed = "Yes" Then
Me.Date_Inspection_Comp.Visible = True
Me.Date_Inspection_Comp = Me.Dateinsp
Me.Inspector.Visible = True
Me.Qty_Inspected.Visible = True
Me.OK.Visible = True
[Code] ....
I tried to put this in a function so i could call it on load, or on current etc, but cant seem to get it to work, apparently you cannot use the me. in a function.
How do I set up my database so that a password is required if the User tries to press F11?
Any ideas?
bizzy
hiya everyone:o . is there anyone that can help me.i need to know how i can put passwords onto access programs i have made. so when i open a form you have to enter a password to get in to it.
thanks richie_b60:confused:
I have tried using a timer event to not show a form until it is fully loaded, to no avail.
Code:
If CurrentProject.AllForms("FONNewEdit").IsLoaded = True Then
Me.Visible = True
Me.TimerInterval = 0
End If
I have tried using the onload, onopen but the form still displays before being fully loaded.
I created a DB in an old PC of mine for a customer. I set passwords for user accounts to prevent users from accessing the design etc. I bought a new PC lately and I want to open the DB to work in it but I get an error saying that I do not have the rights. I suppose I need to create the same accounts in my new PC as in the old one but I don't remember the username or password that I was using back then. Any Ideas???
View 4 Replies View RelatedWithin our client estate, there are a number of types of machines and a number of admin passwords that go with them
I need to put an agent on each of these machines but first i need to make all the admin passwords the same or add our domain group to the local administrators on that machine.
In order to do that I need to know what the admin password is for that specific machine
So a series of attempts with various different passwords and users names are required.
so something like this maybe
dim admin1 as string
dim pass1 as string
dim admin2 as string
dim pass2 as string
dim admin3 as string
dim pass3 as string
dim admin4 as string
dim pass4 as string
call Shell("psexec \192.168.0.1 -u + admin1 + -p + pass1")
if error = 1 then
call Shell("psexec \192.168.0.1 -u + admin2 + -p + pass2")
else
end if
end
Is this the best way to approach this? - Am confused? - Thank you
Hi guys how do you store secure passwords in the database?
So that if someone has acess to the database they want be able to see what they are.
I've created users and groups in my access database and assigned the permissions. My security wizard is not working. How do I enable the secuirty-- force the users to logon with a username and password?
View 3 Replies View RelatedThis is probably a really easy thing to do but I need to set up users and passwords to access a database that will contain sensitive information so cannot be accessible to everyone.
Can someone please tell me an easy step-by-step way on how to do this, with multiple users allowed to add and edit information (but not the workings of tables, queries etc)?
I am pretty much self taught so nothing too technical if possible!!
Also, the user's name needs to be input into an "Entered By" field in a form automatically depending on who has logged in when a new record is created.
Thanks in advance for your help with this.
Emma
I would really like to have a better understanding of the secrurity that comes with access. I would like my DAP to be able to log in with the previleges given for each user. I would also like these previledges to work when someones opens the database with access, however, whenever I set the secureity stuff, copy the database to the fileserver, I can then open it with another computer without any problems. Why is this? Thanks guys, I'n new here.
View 2 Replies View RelatedHello.
I want to prevent people accessing the control boxes on a 'satalite' mdb. I have hidden the control at the top through the start up options, but havent prevented the special keys as I occassionally need to get in this database for error fixing and such like. I want to know if I can put a password on this function, so that if they know it and try it it asks for a password before opening the control windows/table pages etc.
does anyone know if this is poss and if so how too ???
Thanx in advance for your time
I am currently working on a database which has links to two other databases both of which are password protected. The problem occurs when the main database needs to access data in the others as it prompts for their passwords to be entered.
I was wondering if anyone knew a way to automate this so that the user would not be asked for the password but instead it would be coded into the main database.
Any help would be appreciated.
I have developed an MSAccess Database on my Workstation with an authorized MSAccess License, and I need now to share this Database with other people from your company that do have MSAccess license as well.
I also need to secure my Database with access, read, modify and delete options because only one user knows how to run simple queries and create basic tables but the others only know how to enter data and analyse the info with Excel.
From what I understand, I am the admin and they are the users.
Question 1: Is it possible to unset the "Exclusive mode" to allow the users to enter data at the same time the Admin does?
Question 2: Is there another way to limit the access and define permissions other than with Workgroup - Workgroup Administrator does not seem to be user friendly. Would it be better to create a switchboard?
Question 3: Is there a site where I can get detailed instructions (courses) on Workgroup settings?
Thanks a zillion.