I have a combo box on my form, when the form loads the combo box is blank, but the records attached to the first item in the combo box are loaded in the subform on the form so it appears that I have records attached to nothing (which isn't the case). Basically, I want the first item in the combo box to be visible on load so that the records in the subform don't look orphaned.
First, just want to say I wish I had found this site a long time ago. Lots of good stuff here :) I don't know a lot about Access, but know it can be a great tool for what I need. So I hope I can find the help I am looking for...
Ok, on my form I have three unbound combobox's that I use to filter the information I want. The first two do not need to be used, meaning that the third combobox will show all the records if the first two are left blank. With that being said... I would like the form to show no data until the selection is made in this third combobox. SO, my first question is how do I make the form show no records till this combobox has a selection. And second (at the same time), make that third unbound combobox with the selection load that record to the form fields so they can be viewed or edited??
I'm sure it can be done, but I am lost... Hope I explained it ok :) Thanks in advance!!!!!!
Hey, I have 2 combo boxes. The first one gives a lis of Prefix letters for railcars. The second uses the value of the 1st and finds railcars that start with the same letters.
finally got the 2nd combo box to list the prefix and number of a railcar based on the 1st combo box and also got it to clear as each run-through starts.
Now that the user can select a number (ex. dfcv1234 as the railcar), I need to find the record with the prefix dfcv and the car number 1234 and load the record to the form for view and editing.
So far, I know it needs to be the after update event and have a select statement that finds the [key], [prefix], [car_number] that matches the value selected on the form but how do I use the key to make the record show on the form?
There are 2 issues I am trying to figure out for an Access2007 form:
1) I should first state that I am working off of 3 tables: a) Marketers b) Companies that belong to those marketers c) Points of Contacts (POC) for each Company
2) In my frmMain, I have 2 combo boxes. The first loads the second and the second loads a CompanyID text field (IDc) that the subform bases for which record info to pull. How do I get the CompanyID (and subform) fields to load blank upon form open and until the 2nd combo box selection is made?
3) A company that doesn't have any POCs entered yet won't load its CompanyID even though it DOES have an ID number. Well the Id not being changed doesn't change the POC info either. I am guessing it's because there is no info to fill in the subform yet. However, I need to be able to still pull up the blank fields so I can ADD a POC.
I have a form that I populate after making selections in two combo boxes but when I load the form the text boxes are already filled in with the first record. The combo boxes load blank, which is what I want.
How do I get the rest of the form to be blank on load? It is made up of text boxes and check boxes that are all bound. Will this only work if they are unbound?
I am having an issue trying to show all records when I load my form. It loads correctly when I don't have a record source for the main form. However, the combobox filters will not work. My goal is to have users be able to use the datasheet, subdatasheet and combobox filters. I can get the form to work just fine when I link the Main form and subform, but when the form opens it is filtered on the first record. I have been successful with this approach when using other forms, but they didn't require a subdatasheet.
Is there anyway I can have the comboboxes to filter yet be able to show all records until the user selects filters? Is this possible?I finally got my Manager to agree to use a database instead of Excel files based on this form setup and I need to make as "user friendly" as possible (look and function like a spreadsheet) I attached some pics of the form along with the code for the filter.
I need my menu form to load automatically (pop up) when you load up the database... i.e exactly like it does with the switchboard in the templates for access.
Load my DB from ram --------------------------------------------------------------------------------
hi
i have read that it is possible to upload my db in ram memory and open it from there. When i finished my work to save it at a external drive.
How can i do this ? or where to read ? or sample db ? or better a code ?
thxs
*i know that if i close my db before a save it at the drive , i will lose all the new records.
i have a friend and he bought a program(made by vb). The program is stored in a usb flash drive and every morning he plug the flash run a small utility which upload the main program at ram. Then he unplug the flash and start working with the program.Everything is being saved at Ram. When he want to leave , plug the flash and run the utility which save the program at the flash. If he close the program and he hasn't run the utility , he is losing the new entries.
The reason he is doing... Simple to hide things that he is saving at the program.
So 1)Plug the usb 2)run the utility to upload the app 3)unplug the usb 4)work at the app 5)plug the usb and save data
if someone try to see the app , he is closing it or unplug the pc from electricity. he will lose only the new data. Simple
Good for people how want to hide stuff (will taxes)
Im looking to have a particular form open on load of the database and in a uniform size. As well as this I would like have all fields on one of my forms disabled when I click to enter this form. Any help would be appreciated!
hi i have a form with 12 checkbox and 1 combobox i use the following code
Option Compare Database Private Sub Form_Current() If Me.Image1 = -1 Then Me.Parent.Image1.Visible = True Me.Image1_text.FontBold = True Else Me.Parent.Image1.Visible = False Me.Image1_text.FontBold = False End If
If Me.Image2 = -1 Then Me.Parent.Image2.Visible = True Me.Image2_text.FontBold = True Else Me.Parent.Image2.Visible = False Me.Image2_text.FontBold = False End If If Me.Image3 = -1 Then Me.Parent.Image3.Visible = True Me.Image3_text.FontBold = True Else Me.Parent.Image3.Visible = False Me.Image3_text.FontBold = False End If If Me.Image4 = -1 Then Me.Parent.Image4.Visible = True Me.Image4_text.FontBold = True Else Me.Parent.Image4.Visible = False Me.Image4_text.FontBold = False End If If Me.Image5 = -1 Then Me.Parent.Image5.Visible = True Me.Image5_text.FontBold = True Else Me.Parent.Image5.Visible = False Me.Image5_text.FontBold = False End If
If Me.Image6 = -1 Then Me.Parent.Image6.Visible = True Me.Image6_text.FontBold = True Else Me.Parent.Image6.Visible = False Me.Image6_text.FontBold = False End If
If Me.Image7 = -1 Then Me.Parent.Image7.Visible = True Me.Image7_text.FontBold = True Else Me.Parent.Image7.Visible = False Me.Image7_text.FontBold = False End If
If Me.Image8 = -1 Then Me.Parent.Image8.Visible = True Me.Image8_text.FontBold = True Else Me.Parent.Image8.Visible = False Me.Image8_text.FontBold = False End If
If Me.Image9 = -1 Then Me.Parent.Image9.Visible = True Me.Image9_text.FontBold = True Else Me.Parent.Image9.Visible = False Me.Image9_text.FontBold = False End If
If Me.Image10 = -1 Then Me.Parent.Image10.Visible = True Me.Image10_text.FontBold = True Else Me.Parent.Image10.Visible = False Me.Image10_text.FontBold = False End If
If Me.Image11 = -1 Then Me.Parent.Image11.Visible = True Me.Image11_text.FontBold = True Else Me.Parent.Image11.Visible = False Me.Image11_text.FontBold = False End If
If Me.ComboBox1 = "No" Then Me.Parent.ComboBox1.Visible = False Me.ComboBox1_text.FontBold = False Else Me.Parent.ComboBox1.Visible = True Me.ComboBox1_text.FontBold = True End If
If Me.Image12 = -1 Then Me.Parent.Image12.Visible = True Me.Image12_text.FontBold = True Else Me.Parent.Image12.Visible = False Me.Image12_text.FontBold = False End If End Sub Private Sub Image1_AfterUpdate() If Me.Image1 = -1 Then Me.Parent.Image1.Visible = True Me.Image1_text.FontBold = True Else Me.Parent.Image1.Visible = False Me.Image1_text.FontBold = False End If End Sub Private Sub Image2_AfterUpdate() If Me.Image2 = -1 Then Me.Parent.Image2.Visible = True Me.Image2_text.FontBold = True Else Me.Parent.Image2.Visible = False Me.Image2_text.FontBold = False End If End Sub Private Sub Image3_AfterUpdate() If Me.Image3 = -1 Then Me.Parent.Image3.Visible = True Me.Image3_text.FontBold = True Else Me.Parent.Image3.Visible = False Me.Image3_text.FontBold = False End If End Sub Private Sub Image4_AfterUpdate() If Me.Image4 = -1 Then Me.Parent.Image4.Visible = True Me.Image4_text.FontBold = True Else Me.Parent.Image4.Visible = False Me.Image4_text.FontBold = False End If End Sub Private Sub Image5_AfterUpdate() If Me.Image5 = -1 Then Me.Parent.Image5.Visible = True Me.Image5_text.FontBold = True Else Me.Parent.Image5.Visible = False Me.Image5_text.FontBold = False End If End Sub Private Sub Image12_AfterUpdate() If Me.Image12 = -1 Then Me.Parent.Image12.Visible = True Me.Image12_text.FontBold = True Else Me.Parent.Image12.Visible = False Me.Image12_text.FontBold = False End If End Sub Private Sub Image6_AfterUpdate() If Me.Image6 = -1 Then Me.Parent.Image6.Visible = True Me.Image6_text.FontBold = True Else Me.Parent.Image6.Visible = False Me.Image6_text.FontBold = False End If End Sub Private Sub Image7_AfterUpdate() If Me.Image7 = -1 Then Me.Parent.Image7.Visible = True Me.Image7_text.FontBold = True Else Me.Parent.Image7.Visible = False Me.Image7_text.FontBold = False End If End Sub Private Sub ComboBox1_AfterUpdate() If Me.ComboBox1 = "No" Then Me.Parent.ComboBox1.Visible = False Me.ComboBox1_text.FontBold = False Else Me.Parent.ComboBox1.Visible = True Me.ComboBox1_text.FontBold = True End If End Sub Private Sub Image8_AfterUpdate() If Me.Image8 = -1 Then Me.Parent.Image8.Visible = True Me.Image8_text.FontBold = True Else Me.Parent.Image8.Visible = False Me.Image8_text.FontBold = False End If End Sub Private Sub Image9_AfterUpdate() If Me.Image9 = -1 Then Me.Parent.Image9.Visible = True Me.Image9_text.FontBold = True Else Me.Parent.Image9.Visible = False Me.Image9_text.FontBold = False End If End Sub Private Sub Image10_AfterUpdate() If Me.Image10 = -1 Then Me.Parent.Image10.Visible = True Me.Image10_text.FontBold = True Else Me.Parent.Image10.Visible = False Me.Image10_text.FontBold = False End If End Sub Private Sub Image11_AfterUpdate() If Me.Image11 = -1 Then Me.Parent.Image11.Visible = True Me.Image11_text.FontBold = True Else Me.Parent.Image11.Visible = False Me.Image11_text.FontBold = False End If End Sub
how to optimize my code to run faster???
the images are 1 KB size , 16x16 pixels and .bmp All of them are insert inside db.
i think images are too small to slow down my code. Can i write the code in a different way?
Hello, I have a client who downloads data from a website. I must then put this data into an access database. The problem I am having is that the file is a strange format - it comes to me as filename.servlet[3]
I am assuming that this is some kind of java file, but am not really sure. I can open it with notepad and it looks like a comma delimited file, but i can't figure out how to get it into an access table.
Does anyone have any idea how to handle this file?
I was wondering if it is possible to load multiple forms into one subform? For example: I have form [SO2Menu] and form [Critical]. Can I have one subform in a main form that by the click of a button ill load either menu depending on the users selection?
I have 1 form lets call it Form1 which has a text box called say textBox1(along with many other form components), the will find record they want and then click a button, which i want to open a new different form (Form2) and set a text box on that form (textBox2) to the value of the textBox in Form1.
Dim tmp As String tmp = VolunteerID.Value
DoCmd.OpenForm "Comment", acNormal, , , acFormAdd, acWindowNormal DoCmd.GoToRecord , , acNewRec 'To obtain that varibale was read. MsgBox (tmp) 'Not sure if this is needed 'VolunteerID2.SetFocus VolunteerID2.Text = tmp
I have some trouble getting a form to open maximized. This form is opening from a switchboard that is centered and not sizable. After clicking on a command button in the switchboard the form I am having trouble with opens in its own window, but I cannot get it to maximize automatically. I have been to every setting I know on the form properties but for some reason nothing seems to be able to get that form to open maximized.:confused:
:confused: I have a particular Windows XP Home edition machine that is giving me a headache...
On the DB - users can access a form that displays pictures in a Picture control (via file path) with no problem at all. The problematic machine displays 'Access does not recognise the file format and so can't load the picture....' or something of that ilk....
Yet the file format is JPG and if I use the qualified path (on this same machine), eg. \SERVERFolderPicsPICTURE.JPG from the XP Start/Run menu - XP Image viewer opens and displays the JPG with no problem at all!
Why is this happening only on this XP machine and not on the others..??? Any ideas would be greatly appreciated - thanks in advance.
Hello all, I have a continuous form that is slow on loading a portion of the code. The form is designed to pull students who need to be either warned or terminated based off of their GPA. Below is the code that is delayed in being displayed on the form:
Public Function warnOrTerminate(creditAttempt As Integer, GPA As Double) ' these numbers are from the "satisfactory progress" portion of the catalog
'warning if the following is true 'GPA<1.5 and ([cAttempt]<=15) 'GPA<1.9 and ([cAttempt]>=16 and [cAttempt]<=30) 'GPA<2.2 and ([cAttempt]>=31 and [cAttempt]<=45) 'GPA<=2.4 and ([cAttempt]>=46)
'terminate if the following is true 'GPA<1 and ([cAttempt]<=15) 'GPA<1.5 and ([cAttempt]>=16 and [cAttempt]<=30) 'GPA<1.75 and ([cAttempt]>=31 and [cAttempt]<=45) 'GPA<=2 and ([cAttempt]>=46)
Select Case creditAttempt Case Is <= 15 If GPA < 1 Then warnOrTerminate = "Terminate (1.0)" ElseIf GPA < 1.5 Then warnOrTerminate = "Warning (1.5)" End If
Case 16 To 30 If GPA < 1.5 Then warnOrTerminate = "Terminate (1.5)" ElseIf GPA < 1.9 Then warnOrTerminate = "Warning (1.9)" End If
Case 31 To 45 If GPA < 1.75 Then warnOrTerminate = "Terminate (1.75)" ElseIf GPA < 2.2 Then warnOrTerminate = "Warning (2.2)" End If
Case Is >= 46 If GPA < 2 Then warnOrTerminate = "Terminate (2.0)" ElseIf GPA < 2.4 Then warnOrTerminate = "Warning (2.4)" End If
End Select
Everything works fine - but the field that shows the end user to either warn or terminate the student shows up very delayed. Any thoughts or ideas on speeding this up??
Ok, I'm new the access database security. I want to disable the shift key as soon as the database is opened to prevent users from getting to my data. I do have userlevel security in place with modal forms. This is my final step...I hope.
Is there any code or sample database that I may download? Thank you for your advice.
How do I load a form from another form? I would prefer to use VB (in fact, its probably the only way you can do it!). I have tried varius commands that would have worked in VB - but dont work in Access, like...
The above code does not work AT ALL. It gets an error at the Unload Me line, an error at the Load Form_tblClients line, and the action 'Show' does not even exist under Form_tblClients, so that wont work either!
I am aware of Switchborads, but i want to know how to load a form, and make it pop up in a new window from within another form.
I have a OLE Object field in my Access table. It has a blob (long binary data) already in it. It is a very small .bmp image. How do I get this image from the table loaded in a form to it displays the image? I tried setting this value to a image box, bound object field on form load but nothing is working. Any help would be great. Thanks
I have been dabbling in excel to get data from an online database however I would like it to come straight into access instead of coming through excel.
In excel it is quite easy using a web query however I have not been able to find anything that can do the same in access. Is it even possible or will I need to use excel as the stepping stone?
I have 1900+ records, of where each record is represents a PDF Document in my folders.Each document in my folders is named in the same format "2014-001a" for example. This is the combination of two fields in my Access Database - Document Number and Current Revision.
I am looking for some Macro/VBA where I can put the same command on every records form, that will then recognise the Document Number and Current Revision of that record, and then "On Click" able to directly load up that Pdf.
I have 3 forms. The only form a user will ever see is F_Main
F_MAIN (Just loads the 2 forms below within itself) F_Data_Short (Grid View.. Rows and Columns.. All Records.. Shows some fields) F_Data_Long (Single Record View.. Showing all fields)
F_MAIN -> On the left is F_DATA_SHORT -> On the Right is F_DATA_LONG
How can I set it.. When a record on the left included form is clicked.. it loads that same record on the right included form. No pop ups...
I know I can use the On Click option for the form on the Left... and set code or a macro to the load the data on the right. I tried everything and can't seem to get the data to load on the right when a record is clicked on the left...
I have a form, that when I create a new record it puts a a =Now() time stamp in the Date Field, but I would like for that time to be updated if anything on the record is changed, later on. How do I update that time?
