Solved

Change MS Access VB Code from Hourglass to animation, GIF or AVI

Posted on 2009-04-01
2
577 Views
Last Modified: 2013-11-28
I have an Access 2003 database that executes code on a button click.
I would like to know if I can embed an AVI or other moving picture to indicate a file export during my VB Code execution rather than my current (very nifty) Hourglass option.  Please no mocking, I dont code for a living.
DoCmd.Hourglass True
    TheFac = DLookup("[Facility]", "Fac")
    TheDate = DLookup("[TheDate]", "Fac")
    TheFile = "G:\Billing\Billing-" & TheFac & TheDate & ".xls"
    DoCmd.OutputTo acQuery, "MonthlyBillingExport", "MicrosoftExcelBiff8(*.xls)", "G:\Billing\Billing-" & TheFac & "_" & TheDate & ".xls", False, "", 0
    DoCmd.Hourglass False
    TheMessage = "Report has been exported to  " & TheFile
    Beep
    MsgBox TheMessage, vbInformation, "Report Complete"

Open in new window

0
Comment
Question by:kgadams
2 Comments
 
LVL 46

Accepted Solution

by:
tbsgadi earned 150 total points
ID: 24046960
Hi kgadams,

You can use the gif89 activex
File here:
http://www.vbforums.com/showthread.php?t=79007
Explanation here:
http://www.tek-tips.com/faqs.cfm?fid=108


Good Luck!

Gary
0
 
LVL 75

Assisted Solution

by:DatabaseMX (Joe Anderson - Access MVP)
DatabaseMX (Joe Anderson - Access MVP) earned 100 total points
ID: 24046984
Check this out - no DLL's to register:

http://www.lebans.com/animatedgifplayer.htm

mx
0

Featured Post

Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Regardless of which version on MS Access you are using, one of the harder data-entry forms to create is one where most data from previous entries needs to be appended to new records, especially when there are numerous fields and records involved.  W…
Phishing attempts can come in all forms, shapes and sizes. No matter how familiar you think you are with them, always remember to take extra precaution when opening an email with attachments or links.
Familiarize people with the process of utilizing SQL Server views from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Access…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question