Inserting a Picture

  • Thread starter Thread starter Dan
  • Start date Start date
D

Dan

In Visual Basics I have my code that says:

Dim Notes As String
Notes = ...

I want to be able to say something like:

Dim Picture As ?
Picture = OLEPic

What would I set the picture type as?

Also how can I make change the font size and make it bold?
 
In Visual Basics I have my code that says:

Dim Notes As String
Notes = ...

I want to be able to say something like:

Dim Picture As ?
Picture = OLEPic

What would I set the picture type as?
Click to expand...

I assume you are, in fact, speaking about the Visual Basic for Applications
that is used in Microsoft Access, the subject of this newsgroup. If not,
then you need to ask your question in a newsgroup devoted to the (separate)
Visual Basic language product.

What is it that you intend to do with a Picture "object"? That's certainly
not how we display pictures in Access.

The sample imaging databases at http://accdevel.tripod.com illustrate three
approaches to handling images in Access, and the download includes an
article discussing considerations in choosing an approach. Two of the
approaches do not use OLE Objects and, thus, avoid the database bloat
associated with images in OLE Objects.

If you are printing the images in reports, to avoid memory leakage, you
should also see MVP Stephen Lebans' http://www.lebans.com/printfailures.htm

PrintFailure.zip is an Access97 MDB containing a report that fails during
the Access formatting process prior to being spooled to the Printer Driver.
This MDB also contains code showing how to convert the contents of the Image
control to a Bitmap file prior to printing. This helps alleviate the "Out of
Memory" error that can popup when printing image intensive reports.

Larry Linson
Microsoft Access MVP
 
in addition to Larry's answer:
if you are not sure about object type - you can always use Object. plus dont
forget to add set when you reference objects:

Dim Picture As object
set Picture = OLEPic
 
What I am trying to do is send my form in an email with
just the record that is being displayed. I have it so
that the emailing part works, I am just having trouble
setting up the design of the email. I am just sending the
information to outlook from access. What I would like to
do is make it so that I could somehow get a picture of
the what the form looks like with the selected record. Is
there any way to do this? if not how can I tell it to
insert a picture. This is the code that I currently have:

'******begin code******
Dim EmailAddress As String
Dim Subject As String
Dim EmailMessage As String

'Dim Picture As ????

'**create variables for Outlook
Dim objOutlook As Outlook.Application
Dim MyEmail As Outlook.MailItem

'**gathers information from your form. this sets the
string variable to your fields

EmailAddress = Me.Email
Subject = "..."
EmailMessage = Picture & EmailMessage

'***creates an instance of Outlook
Set objOutlook = CreateObject("Outlook.application")
Set MyEmail = objOutlook.CreateItem(olMailItem)

'***creates and sends email

With MyEmail
.To = EmailAddress
.Subject = Subject
.Body = EmailMessage
.Send 'sends the email in Outlook.
End With

'**closes outlook
objOutlook.Quit
Set MyEmail = Nothing

Exit Sub
'****end code****
 
i think you have send your picture as attachment. Outlook.MailItem have a
methof to do this, you have to pass a full path to your picture
 
Back
Top