Access 2007-2019
Access 2000-2003
Access Seminars
TechHelp Support
Tips & Tricks
Access Forum
Course Index
Topic Glossary
Insider Circle
 
Home   Courses   Seminars   Templates   Help   TechHelp   Forums   Contact   Join   Order   Logon  
 
 
Access Imaging Seminar
By Richard Rost   Richard Rost on Twitter Richard Rost on LinkedIn Email Richard Rost   14 years ago

ADDENDUMS: Make sure you see the Imaging Seminar Addendum regarding the PickFile function replacement for the LaunchCD function, and making the database work with 64 bit Access.

The other "addendum" you may see mentioned about this seminar is covered by the Images TechHelp video.

Learn how to properly work with images and graphics in your database. This 3.5 hour seminar covers:

  • OLE Objects, Linking, Embedding
  • Display external images in forms
  • Browse drive to select a file
  • Copy to a "shared images" folder
  • Embed non-image objects
  • Display Web-based images
  • New Attachment data type

RE: Microsoft Access Imaging Seminar

 

64 Bit Common Dialog Upload Images   Link  
Scott Bryant 
11 months ago
Lesson 12 pulling the code gives the me same error going from 32 bit to 64.  I am using Windows 10 and Access 2019/365 and I don't see any updated instructions that make any sense for this.  Can you help me?
Richard Rost
11 months ago
I have not tested this yet, but try this:

#If VBA7 Then 'use PtrSafe  
    Private Declare PtrSafe Function GetOpenFileName Lib "comdlg32.dll" Alias _
        "GetOpenFileNameA" (pOpenfilename As OpenFilename) As Long
#ElseIf Win64 Then 'need datatype LongPtr
    Private Declare PtrSafe Function GetOpenFileName Lib "comdlg32.dll" Alias _
        "GetOpenFileNameA" (pOpenfilename As OpenFilename) As LongPtr
#Else '32-bit Office
    Private Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _
        "GetOpenFileNameA" (pOpenfilename As OpenFilename) As Long
#End If


Just replace the Private Declare Function line at the top with this block of code.
Add a Reply
Slide Show Upload Images   Link  
Richard Lanoue 
17 months ago
Is there a way I can assign a series of photos in a particular folder and start a sequence of images to be shown on an image frame that cycle to the next on a command button?
Richard Rost
17 months ago
I suppose you could change the ControlSource of the image with some VB code. Use a Timer event to cycle them. Or even use a Subform to allow the user to scroll through different images. Anything is possible.
Add a Reply
Upload Images   Link  
Richard Lanoue 
2 years ago
I had to use PtrSafe in my Declaration on the code because it wouldn't compile. Now that I get the error message to go away.  When I click to launchcd  I get mesgbox file not selected.  the browser doen't open a window for me to select a file to go to.  Pleas advise.  It worked on my old computer and now that I got an upgrade it doesn't work.  What do I do?
Add a Reply

Show Older Comments...
View in Table Format

Start a NEW Conversation
 
Only students may post right now. Click here for more information on how you can set up an account. If you are a student, please LOG ON first.
 
Subscribe
 

You may want to read these articles from the 599CD News:

12/4/2021Hangman!
12/3/2021Access Beginner 2
12/3/2021Access Beginner 2 Lessons
12/3/2021Access Beginner 2
11/30/2021Import Multiline Cells
11/30/2021Adam's Access Games
11/29/2021Prevent Close
11/28/2021Random
11/22/2021Currency Symbols
11/13/2021Access Developer 36
 

Learn
 
Access - index
Excel - index
Word - index
Windows - index
PowerPoint - index
Photoshop - index
Visual Basic - index
ASP - index
Seminars
More...
Customers
 
Account Login
Online Theater
Downloads
Lost Password
Memberships
Student Databases
Change Email
Info
 
Latest News
New Releases
User Forums
Topic Glossary
Tips & Tricks
Search The Site
Code Vault
Collapse Menus
Help
 
Customer Support
Web Site Tour
FAQs
TechHelp
Consulting Services
About
 
Background
Testimonials
Jobs
Affiliate Program
Richard Rost
Free Lessons
Mailing List
Order
 
Video Tutorials
Handbooks
Memberships
Learning Connection
Idiot's Guide to Excel
Volume Discounts
Payment Info
Shipping
Terms of Sale
Contact
 
Contact Info
Support Policy
Email Richard
Mailing Address
Phone Number
Fax Number
Course Survey
Blog RSS Feed    Twitter

YouTube Channel    LinkedIn
PermaLink