By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
424,851 Members | 1,172 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 424,851 IT Pros & Developers. It's quick & easy.

Continuous Form and Images

P: n/a
I have read all the previous posts on this subject and just want to
make sure I have exhausted all possibilities before trashing this
concept...

I have an Access (2K) database with a SQL Server backend.
I have a table on SQL Server that has a column that is used to hold
small icons with datatype image.

This table links to others to form a recordsource that populates an
Access continuous form that displays the icons in a bound object frame.
Everything works fine. Each record shows the correct icon. The problem
is over a slow connection it is very, very slow to populate the
continuous form, even though the icons are very small (10 x 10 pixels.)

Ideally, I'd want to populate the image controls with icons stored
locally on each user's machine and linked, however, the vast amount of
postings on this subject seem to indicate that is not possible.

Is there a better (faster) way of doing what I am trying to do?
Any help is appreciated.
lq

Nov 13 '05 #1
Share this Question
Share on Google+
3 Replies


P: n/a
If you store the path to the image in a table, and providing that path is
identical on everybodies machine, I can't see why not

Public Function FindOldPhoto(frm As Form, PhotoPath As String, ID As Long)

'HKEY_LOCAL_MACHINE\Software\Microsoft\ Shared Tools\Graphics
Filters\Import\JPEG\Options ShowProgressDialog No

Dim Msg As String

If Nz(ID) = 0 Or Nz(PhotoPath) = "" Then
frm!Photo.Picture = ""
Exit Function
End If

If Dir(PhotoPath) = "" Then ' not found
Msg = "Photo: " & PhotoPath & vbCrLf
Msg = Msg & "is not found at the above location (or is misspelled)"
MsgBox Msg, vbInformation, "Missing Photo"
frm.Photo.Picture = ""
Exit Function
End If

frm!Photo.Picture = PhotoPath
Set ImageTypeSet = Nothing
Set MyDb = Nothing

End Function
PhotoPath will look something like "C:\My Documents\My Pictures\Icons\Icon1"
ID is the main key of the record and used just to check that we are not on a
new record.
Frm is the form on which to display the Image
Photo is the Image Control

HTH

Phil

"laurenq uantrell" <la*************@hotmail.com> wrote in message
news:11**********************@f14g2000cwb.googlegr oups.com...
I have read all the previous posts on this subject and just want to
make sure I have exhausted all possibilities before trashing this
concept...

I have an Access (2K) database with a SQL Server backend.
I have a table on SQL Server that has a column that is used to hold
small icons with datatype image.

This table links to others to form a recordsource that populates an
Access continuous form that displays the icons in a bound object frame.
Everything works fine. Each record shows the correct icon. The problem
is over a slow connection it is very, very slow to populate the
continuous form, even though the icons are very small (10 x 10 pixels.)

Ideally, I'd want to populate the image controls with icons stored
locally on each user's machine and linked, however, the vast amount of
postings on this subject seem to indicate that is not possible.

Is there a better (faster) way of doing what I am trying to do?
Any help is appreciated.
lq

Nov 13 '05 #2

P: n/a
Phil,
Yes your method will populate a control on a single form, not a
continuous form however.
lq
Phil Stanton wrote:
If you store the path to the image in a table, and providing that path is identical on everybodies machine, I can't see why not

Public Function FindOldPhoto(frm As Form, PhotoPath As String, ID As Long)
'HKEY_LOCAL_MACHINE\Software\Microsoft\ Shared Tools\Graphics
Filters\Import\JPEG\Options ShowProgressDialog No

Dim Msg As String

If Nz(ID) = 0 Or Nz(PhotoPath) = "" Then
frm!Photo.Picture = ""
Exit Function
End If

If Dir(PhotoPath) = "" Then ' not found
Msg = "Photo: " & PhotoPath & vbCrLf
Msg = Msg & "is not found at the above location (or is misspelled)" MsgBox Msg, vbInformation, "Missing Photo"
frm.Photo.Picture = ""
Exit Function
End If

frm!Photo.Picture = PhotoPath
Set ImageTypeSet = Nothing
Set MyDb = Nothing

End Function
PhotoPath will look something like "C:\My Documents\My Pictures\Icons\Icon1" ID is the main key of the record and used just to check that we are not on a new record.
Frm is the form on which to display the Image
Photo is the Image Control

HTH

Phil

"laurenq uantrell" <la*************@hotmail.com> wrote in message
news:11**********************@f14g2000cwb.googlegr oups.com...
I have read all the previous posts on this subject and just want to
make sure I have exhausted all possibilities before trashing this
concept...

I have an Access (2K) database with a SQL Server backend.
I have a table on SQL Server that has a column that is used to hold
small icons with datatype image.

This table links to others to form a recordsource that populates an
Access continuous form that displays the icons in a bound object frame. Everything works fine. Each record shows the correct icon. The problem is over a slow connection it is very, very slow to populate the
continuous form, even though the icons are very small (10 x 10 pixels.)
Ideally, I'd want to populate the image controls with icons stored
locally on each user's machine and linked, however, the vast amount of postings on this subject seem to indicate that is not possible.

Is there a better (faster) way of doing what I am trying to do?
Any help is appreciated.
lq


Nov 13 '05 #3

P: n/a
Whoops Sorry. Works OK for reports

Phil
"laurenq uantrell" <la*************@hotmail.com> wrote in message
news:11**********************@c13g2000cwb.googlegr oups.com...
Phil,
Yes your method will populate a control on a single form, not a
continuous form however.
lq
Phil Stanton wrote:
If you store the path to the image in a table, and providing that

path is
identical on everybodies machine, I can't see why not

Public Function FindOldPhoto(frm As Form, PhotoPath As String, ID As

Long)

'HKEY_LOCAL_MACHINE\Software\Microsoft\ Shared Tools\Graphics
Filters\Import\JPEG\Options ShowProgressDialog No

Dim Msg As String

If Nz(ID) = 0 Or Nz(PhotoPath) = "" Then
frm!Photo.Picture = ""
Exit Function
End If

If Dir(PhotoPath) = "" Then ' not found
Msg = "Photo: " & PhotoPath & vbCrLf
Msg = Msg & "is not found at the above location (or is

misspelled)"
MsgBox Msg, vbInformation, "Missing Photo"
frm.Photo.Picture = ""
Exit Function
End If

frm!Photo.Picture = PhotoPath
Set ImageTypeSet = Nothing
Set MyDb = Nothing

End Function
PhotoPath will look something like "C:\My Documents\My

Pictures\Icons\Icon1"
ID is the main key of the record and used just to check that we are

not on a
new record.
Frm is the form on which to display the Image
Photo is the Image Control

HTH

Phil

"laurenq uantrell" <la*************@hotmail.com> wrote in message
news:11**********************@f14g2000cwb.googlegr oups.com...
>I have read all the previous posts on this subject and just want to
> make sure I have exhausted all possibilities before trashing this
> concept...
>
> I have an Access (2K) database with a SQL Server backend.
> I have a table on SQL Server that has a column that is used to hold
> small icons with datatype image.
>
> This table links to others to form a recordsource that populates an
> Access continuous form that displays the icons in a bound object frame. > Everything works fine. Each record shows the correct icon. The problem > is over a slow connection it is very, very slow to populate the
> continuous form, even though the icons are very small (10 x 10 pixels.) >
> Ideally, I'd want to populate the image controls with icons stored
> locally on each user's machine and linked, however, the vast amount of > postings on this subject seem to indicate that is not possible.
>
> Is there a better (faster) way of doing what I am trying to do?
> Any help is appreciated.
> lq
>

Nov 13 '05 #4

This discussion thread is closed

Replies have been disabled for this discussion.