I revised my DB thinking that one big form divided by Page Tabs would speed things up. Wrong. It slowed everything down to a crawl. I found the more I broke up Forms into sub-forms the faster things went.
Incidentally this may be the answer to the problem I posted about Permission Lockups. (See Access 2000 Permission lockup posted on 2/20/08). I noticed that the big form version requested to save forms that I think I had not even opened. So when I encountered the problem on installing the DB on my network, I just did two or three saves just for luck. This seemed to do the trick. This suggested that my Permission Lockup may have been due to not all Forms had been saved on closing.
The evidence is circumstantial but I have had no trouble since.
I am very close to completing a DB Program.... How can I create a desktop Icon that will Launch my Program without Loading Microsoft Access along with it???
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?
I am opening a query in Access which has two linked sql tables but it takes to long to open. Can I choose a method (ADO) opening that query? If not, is there a way to speed up the process?
See attached image. I am looking for ways to make my query run faster. When I run this query for small groups which will return less than 100 records, the query takes about 30 seconds. However I have some groups that have over 1000 records and that will take 3-5 minutes to run. Actually sometimes the query even bombs after 30 seconds on the large groups.
This query hits against a linked SQL database. Three of the fields gets the criteria from a form combo box. The thing that makes this query take so long is the Count. It counts the number of times the Signature Type "duedte" has been changed.
I am looking for any suggestions for how to speed this up. I want real time results so I was not sure if copying the data locally each time then running the queries would help any in the overall time.
Im new in using MS Access. How i can "tick" the yes/no button faster. I have almost 3,000 boxes to tick and its making my wrist ache... Unlike in excel where i can just drag it to the last cell....
Hi I have some drop downs on my form, which has some code that decides which recordsource to use. When I first select an option from the drop down, the query takes 10 seconds to load data. I then select another option, which runs a different query, which takes x seconds. If I then select the original option from the dropdown, the data loads onto the form in less than a second.
Why is there a delay the first time round and not the next? Has Access saved some kind of query plan? If so, why doesn't it save it permanently?
My report has in each row at least 1 picture which is about 1.5" square when open; however, when trying to scroll up or down the pictures dazzles on and off while the pausing the scroll which moves slowly. If the pictures are removed the scrolling movement is normal.
How can this report scrolling be made more efficient?
I have a database (.mdb file) which includes a table, forms and VB code. I intend on putting it onto a CD and then opening the form on another computer which may not have Access. Is this possible? Can I convert the file or can I attach some type of reader to the disk? I have seen some software for download on the internet which allows you to open the tables however the Form is the most important thing in this case (but I take it whatever I use, it will need to be able to view the VB, subforms and tables as well since the Form depends on them?).
...also can I install an auto-run to the file for when the disk is inserted? (this is not a major issue though).
I'm not sure if this is even possible but I have a table which has a list of Categories(text) and another field named filepath(also text) which contains a file path which points to specific pdfs. So my question is Can I create a report which then prints the categories with a button next to them which if clicked on opens the coresponding pdf ?
Any help will really be apreciated I am a database novice but am really good at following instructions and copying code :)
I have a question. I have a button on a form. When I press that button, another database should be opened.
I tried this:
Dim dbMyDB As Database Dim rsMyRS As Recordset Set dbMyDB = OpenDatabase("C:DocumentenJohnnyStyle_be.mdb") Set rsMyRS = dbMyDB.OpenRecordset("nslArtikel", dbOpenDynaset)
Hi - I have built a web page which holds links to Word,Excel & Access files. I have the .doc & .xls files opening as I want but when I link to a DB file Access opens in a reduced (small)window. Is there a way to force the Access application to open maximised - before the DB file loads? Any suggestions would be much appreciated. Thanks RussG
I've been developing in Access 2002-2003, and now have Access 2007. I can open a 2002-3 .mdb database OK, but when I click on the Main Menu buttons, nothing happens -- they do not work. So I cannot access any of the existing Menus and Forms. In fact, none of the previously existing databases I tried will open/close Forms using the existing buttons. Any ideas?
i have a word doc that is built by code. at the end, after the doc is completely built, i save the doc and kill my word object. what i want to do is be able to launch the doc automatically for the user, but still be able to kill the code object used to create the doc. what i currently have, which obviously doesn't open the doc, is as follows: Code:wrd.ActiveDocument.SaveAs sOutputDir & sHeader & ".doc"wrd.ActiveDocument.Closewrd.QuitSet wrd = Nothing i can't figure out how to get word to open with my doc. i'm sure i'm overlooking something simple, but does anyone have ideas for me on this?
Hello, I work at a library and we often add books to the library. Each time we have to fill out a form and fax out multiple copies keep a copy. Today I made a database and form in access to do this, so it won't be done on paper anymore. It is actually the first thing I have ever used access for. I have 1 problem now, I need to make it as simple as possible for everyone using the form. I am trying to make it soyou can click on a shortcut from the desktop and open just the form without having to open access and then enter in the data. Is this possible? I have attempted to save as a different type, export as a different type and nothing works. Can someone give me a little expertise on this? Thanks.
I'm wondering if there is a way to open an access database (ive started with a microsoft template for an inventory management database) outside of the access environment. I'd like the program to run more like a .exe file rather than a database, but still having the links to and the functionality of the microsoft database
Is there any way to put a shortcut on someone's desktop that will open a specific report in an Access database? I'm thinking back to the days of DOS when one simply added an argument to the command. I don't want to put it in startup and have it always go to that report. I just want non-Access users to go right where they need to without menus, etc.
i was wondering if anyone might be able to help me out here. I've been spending hours but to no avail. It seems to be a very trivial problem but i'm just out of luck.
I've been getting this pop-up message everytime i try to open up an access application such as .mdb files.
Open file - Security Warning Do you want to open this file ... two buttons: Open & Cancel
My question is if there is a way to turn it off or disable this warning from popping up when opening an access application.
I was wondering if i could get some help here. I think this is to do with the security issue. I usually double-click to open or run an access file (for example student.mdb) that sits on the server with no problem. But this time, nothing happen when i did double-clicked on it from my laptop while the file was being open by someone'else on another computer. I know that it makes sense that we shouldn't open a file that's being used by other users. But my curiosity is that should it not give you a warning like (you know) you're not able to save any changes or things like that. No, i didnot get any of that messages. It's just nothing happen after trying to open it by double-clicking it.
I have set the macro security to low level but that did not help either. Is there any thing that i need to tweak?
I have an appplication that reads information from Access Database, it uses ADO (msado15.dll) to open a database using Connection15::Open( ). I am unable to open Access 2007 database using this method. I get the following error: "Microsoft JET Database Engine, Unrecognized database format". Is there something I am doing wrong or I should be aware of? Does msado15.dll support Access 2007 databases? Thank you in advance.
I have created a database then saved it to my computer. Now while I am trying to open MS ACCESS in my computer I am getting an error message -
"This file may not be safe if it contains that was intended to harm your computer. Do you want to open this file or cancel the operation?" Giving the options - 'CANCEL' 'OPEN' 'MORE INFO'
