Hi All,
I am new to Access and looking for some help.
I have a query, which reads the combo box value and loads the result in Text box. It works fine when I load the Form.
Now here is the problem… If I select another values from combo box the query result remains the same (in text box). How do I make it work dynamically?
So when I select new value in combo box, the resulting query gets updated in textbox.
Thanks
I have a separate form in which I want to use as a loading screen for my users while the query loads on the other form. Now I can do this with text easy but not with a .gif..I have the loading form to
Code:
Private Sub Form_Timer()
DoCmd.Close acForm, "Loading Screen", acSaveNo
DoCmd.OpenForm "Form1", acNormal
But it just stops the .gif and then runs the query before opening Form1.
Hi all,
I have a query that is basically loading values from a open form.
Im using the format of Product: Form!form1!products to assign the value of products to product in my query... Now all this works with straight text, however this technique does not appear to work with dates or yes no check boxes. I have used the builder but still wont work with dates. any ideas? thanks
I have a listbox that uses a query to reference a value in the current form. The problem is for some reason Access is trying to fill this listbox before even showing the form, so I get prompted to manually enter the query criteria when it should be picking it up from the form.
This is bizarre because it's only just started doing it. I've removed the listbox and created it again, but no help. I have listboxes such as this all over the place, but this particular one has just started playing up! Why?
Is it possible to have a form designate which FIELDS to include in a selection query? I know that I can determine criteria and such, but i want the user to be able to generate a report based on the query select a, b, c from blah, or if they wish, just select a, b from blah...
View 5 Replies View RelatedAccess 2003:
I have a query (qryGetRemoteStuff) like this:SELECT * FROM Table1 IN 'k:projectssomedatabase.mdb'I have several databases where i use this technique. I don't want to link these tables to my database.
According to the properties list, "Source Database" is used to store this path to my remote database.
So far so good.
When the path changes i am in a lot of trouble, that is why i want to change the path of this query dynamically. I don't seem able to change this property.
Is this possible? How?
Immediate window:
?currentdb.QueryDefs("qryGetRemoteStuff").Properties("SourceDatabase")Returns "Property not found". Access help F1 doesn't provide me with a workable example.
I can create a select query with a combo box in it by changing the property of one of the fields - making the display control to combo box and adding the values. No problem there.
What I want to do is to be able to create a query dynamically from vba using a CreateQueryDef statement.
The problem is that you can only pass an SQL string to CreateQueryDef, and the combo box values are not part of the SQL code, but are saved with the query (presumably the same way column layout gets saved).
Is there a way to create a query with VBA and include non-SQL layout criteria so I can have combo boxes?
I'm using Access 2002.
Hello all,
I have a temporary table with Yes/No fields (F101,F102,F103,....etc).
In another table i have a field called ProductCode with values (101,102,103,....etc)
Is it possible to append(or update) the records of the temp table with criteria on "F" &ProductCode field? (For example if ProductCode=101 then F101 sets to yes)
Thank you in advance.
Is it possible to add a field (i.e., variable) to a query (or SQL programming) based on a form selection?For instance, if I use a form to allow an end-user to specify which fields they wish to include in the query (essentially creating a UI for the query builder), how would I go about creating the query/SQL or updating the query/SQL?
View 3 Replies View RelatedIs it possible to assign a query to the recordsource of a form dynamically? I assume the answer is yes. Can this action be done when the form is not open? If yes what is the correct syntax to use when the code is in a normal module as a public sub? I tried many possibilities and could not get it to work.
Code:
Dim ForNm as string
Dim Qry as string
ForNm = "PersonalFm"
Forms(ForNm).Recordsource = Qry
Forms![PersonalFm].Recordsource = Qry
[Forms]![PersonalFm].Form.Recordsource = Qry
I used to queries ,1 to get items that are taken ( its all about sign in sign out for equipment) and other query is list of all items.
How can i make 3rd query which will give me all but taken items from query1?
(of course items from query 1 are in query2)
thx in advance
Hi,
I need help urgently. I am currently receiving files in .txt format through ftp which then reside in the same network folder as my Access Db. All the tables have been designed to read the data in. I'll be receiving these files on a daily basis. My idea is to automate this process. So, I would like to delete the existing data from the tables and then load the new set at a particular time everyday. Again, data comes in a .txt format through ftp. Please let me if this could be done and how. Thank you.
Arvind
i have a form, in which two of the controls on the form, are unbound image controls, which display linked images. Now i have a button, which when both images have been displayed successfully, i would like to set the enabled property of this button to true.
How can i detect, that an image has ended up linking and is now fully displayed ?
Thank You
Hey,
I am updating a switchboard from someone elses work.
I get the error on other peoples computers (but not my own) that there is an "error loading DLL" and the I get "The expression On Click you entered as the event property setting produced the following error: The expression you entered has a function name that <database> can't find.
* The expression maay not result in the name of a macro, the name of a user-defined function or [Event Procedure].
* There may have been an error evaulating the function, event, or macro"
I am including a before and after of the db as attached. (-new is the new one)
Again the form opens perfectly on my computer for both but not for anyone else. The error thrown is included as well as the jpg
HELP NEEDED AND APPRECIATED!
Hi, im using a .mdb Database in Access 2003 and i got it stored on my network server.
Now i have this problem:
If i start the Database on one specific computer, the main menu (the first page that pops up at loading) is not showing correctly
Other Forms are accessible through the manager-list
Meaning, that background and picture in background are showing correctly, but none of my buttons are there.
All i get is one single small click-button and a "1" next to it....
Button not having effect at all..
So my questions :
a) why is this problem only showing on ONE and only one computer? On other computers the database is just doing fine.
b) what IS the nature of the problem
c) how to fix it?
Many thanx for a quick reply..
I have a Splash Screen type deal that loads after the user logs in I wanted to know if there was a way that I could add a Loading Bar that would say different things like Are you having a nice day?
View 14 Replies View RelatedHi all,
I encountered some weird symptons with my Access forms. I am using the form to display images(done by setting the OnCurrent and After Update property).
When my PC is just powered on, and i try to load say form "ENGLISH". Form "ENGLISH" will appear, but the focus will switch in between form ENGLISH and the MS ACCESS program window. This action will onli settle down after abt 10 secs.
When the ENGLISH form is loaded, i will attempt to switch from one record to another, but the same thing occurs again. IT will load/refresh for abt 10seconds, with the focus toggling btwn ENGLISH FORM n MS Access.. IN addition, it opens a second copy of FORM "ENGLISH" in the background as can be seen on my taskbar. When i close my 1st form ENGLISH and i attempt to close the 2nd FORM tat is appearing on the taskbar, there will be an error msg, English : MSACCESS.EXE-Application Error, Instruction at....(refer to the attached jpeg file for detailed error location)
Y is it tat this weird behaviour onli applies to the forms tat are used to display images but not those normal forms tat contains of purely text?
The entire behaviour will be eliminated after i close MS access, and reload the DB abt twice.....
Hello All
I have a list box that displays the names of customers who are allowed to hire DVDs.
I would like to highlight a customer and show all the relevant customer data on a separate form, not have the list box on the same form that displays the customer's data.
Regards
Terence
London
Hi
I am trying to get a blank ribbon to be in place when a user opens my application. I have an Adp linked to SQL Server. If I create a table in SQL Server named ribbons and have the app read the data in that table in the AutoExec macro (this runs the code that reads the data) then assign the new ribbon to Application.LoadCustomUI RS("RibbonName").Value, RS("RibbonXml").Value it works and the blank ribbon is displayed. The problem is that this is no use because if the adp is not connected to the database on startup it causes an error as no connection has been established.
Instead I have put exactly the same xml file into a module but this does not have the same affect even though I call the same Application.LoadCustomUI method. I havent really done anything different except change how the xml is found. The problem with this method is it just pops the new ribbon into the list of available ribbons so then the user would have to choose the ribbon, shut down and restart, that is no use.
Has anybody got any idea what can be done about this? I will post the code below.
Thank you for any advice on what can be done.
Paul
First method (which works but is no good for distributing the app)
Autoexec calls the following
Public Function LoadRibbons()
Dim RS As Recordset
Set RS = CurrentProject.Connection.Execute("SELECT Ribbons.RibbonName, Ribbons.RibbonXML FROM RIBBONS")
If Not RS.BOF Then
Application.LoadCustomUI RS("RibbonName").Value, RS("RibbonXml").Value
End If
RS.Close
Set RS = Nothing
End Function
but using the following and calling it in autoexec just puts the ribbon in the list and doesnt use it
Function CreateRibbon()
Dim xml As String
xml = _
"<customUI xmlns=""http://schemas.microsoft.com/office/2006/01/customui"">" & vbCrLf & _
" <ribbon startFromScratch=""true"">" & vbCrLf & _
" <officeMenu>" & vbCrLf & _
" <button idMso=""FileCompactAndRepairDatabase"" visible=""false""/>" & vbCrLf & _
" <button idMso=""FileOpenDatabase"" visible=""false""/>" & vbCrLf & _
" <button idMso=""FileNewDatabase"" visible=""false""/>" & vbCrLf & _
" <splitButton idMso=""FileSaveAsMenuAccess"" visible=""false""/>" & vbCrLf & _
" </officeMenu>" & vbCrLf & _
" </ribbon>" & vbCrLf & _
"</customUI>"
Application.LoadCustomUI "BlankRibbon", xml
End Function
Hi,
what is the best way to load or unload subforms? currently, i have the subforms within my form and code will change it visible and invisible but it would be better i think if they could be loaded or unloaded as i iahve existing code in the forms that all needs to be written.
( i originally had the subforms as separate forms that opened as a single form ).
can you load / unload subforms on a form as normal forms?
regs,
NS
I am looking for a way to automate the clearing of tables and re-loading of data from txt files. Can someone point me in the right direction?
View 4 Replies View RelatedIf I have a tab control in a form, with a form on each tab, will the data from all the tab's forms have to be loaded when I open the 'host' (don't know what to call it) form?
I can't tell if the load time is increased, as there isn't much data there yet, so it's pretty much instant anyway...
Hi.
I am running a form on top of a query with around 1500 records in it. The query mostly uses tables that are joined with referential integrity.
The form has buttons and conditional formatting.
It was fine until today, when suddenly the form has stopped loading properly. It looks all fragmented on the screen and I have to scroll down and scroll back up again for it to look right.
I have searched everywhere to find out what is causing this and how it can be fixed, but no luck yet. Can you help?
Thanks.
hi... I have a form containing 120 subforms...
the form will be loaded depending on the user...
i name my subforms in sequence that is: loadA1, loadA2, loadA3,....
to load a form I just use the code: me.loadA3.sourceobject = "FormName"
and then I make a counter to keep track of which forms are loaded and which one to load next.. as they load in sequence..
the question is if its possible to write the above code in a string type or other way to make the code shorter...
For example my code is as follows: If ACount = 0 Then
Me.LoadA1.SourceObject = "TEMPCableName"
ElseIf ACount = 1 Then
Me.LoadA2.SourceObject = "TEMPCableName"
ElseIf ACount = 2 Then
Me.LoadA3.SourceObject = "TEMPCableName"
ElseIf ACount = 3 Then
Me.LoadA4.SourceObject = "TEMPCableName"
ElseIf ACount = 4 Then
Me.LoadA5.SourceObject = "TEMPCableName"
ElseIf ACount = 5 Then
Me.LoadA6.SourceObject = "TEMPCableName"
ElseIf ACount = 6 Then
Me.LoadA7.SourceObject = "TEMPCableName"
ElseIf ACount = 7 Then
Me.LoadA8.SourceObject = "TEMPCableName"
ElseIf ACount = 8 Then
Me.LoadA9.SourceObject = "TEMPCableName"
ElseIf ACount = 9 Then
Me.LoadA10.SourceObject = "TEMPCableName"
ElseIf ACount = 10 Then
Me.LoadA11.SourceObject = "TEMPCableName"
ElseIf ACount = 11 Then
Me.LoadA12.SourceObject = "TEMPCableName"
ElseIf ACount = 12 Then
Me.LoadA13.SourceObject = "TEMPCableName"
ElseIf ACount = 13 Then
Me.LoadA14.SourceObject = "TEMPCableName"
ElseIf ACount = 14 Then
Me.LoadA15.SourceObject = "TEMPCableName"
ElseIf ACount = 15 Then
Me.LoadA16.SourceObject = "TEMPCableName"
ElseIf ACount = 16 Then
Me.LoadA17.SourceObject = "TEMPCableName"
ElseIf ACount = 17 Then
Me.LoadA18.SourceObject = "TEMPCableName"
ElseIf ACount = 18 Then
Me.LoadA19.SourceObject = "TEMPCableName"
ElseIf ACount = 19 Then
Me.LoadA20.SourceObject = "TEMPCableName"
End If
If ACount < 19 Then
ACount = ACount + 1
ElseIf ACount < 0 Then
ACount = 0
Else
ACount = 20
End If
anyway to make it something like:
"me.loadA" & Acount & ".SourceObject = "TEMPCableName"
??
Thanks in advance
help is much appreciated
I have a player information form where a player picture is stored. When I first wrote the program I was able to upload a picture no problem from my computer, I had a crash and now when I try to load a picture it takes three times as long and all that shows in the picture window is the picture name. Did I lose a setting or a program during the crash? Hope this makes enough sense.
View 4 Replies View RelatedHi every body. I wonder how i can generate and load a report when a button is clicked on access 2000 form. I be happy if some one show me an example.Thanks
View 1 Replies View Related