View Full Version : Open Picture with Windows Picture and Fax Viewer


a_20120
04-03-2007, 10:05 PM
Hello every one,
Could u plz tell me How it is possible to open picture with Windows Picture and Fax Viewer when double clicking on image control...

Oldsoftboss
04-04-2007, 02:01 AM
If you have a look at the 1,000 replies I have given you on this subject, the sample Db has code for "OPEN FOR VIEWING"

Uncomment those lines and comment out the rest and it WILL work.

Bloody Hell

Oldsoftboss
04-04-2007, 02:04 AM
No more.....

a_20120
04-04-2007, 02:46 AM
Thanks,
It works well, but if the Windows Picture and Fax Viewer is not the default viewing for picture and Microsoft Office Picture Manager is the default, then when double clicking on picture it opens the picture with Microsoft Office Picture Manager .
Could anyone plz help me HOW open picture just with Windows Picture and Fax Viewer ?

a_20120
05-01-2007, 08:39 PM
Hello everyone,
for further info, plz see the above reply of OldSoftBoss attachment...

it works well, but when I assign the default view of photo with Microsoft Office Picture Manager or msPaint, then it opens the picture with them not with Windows Picture and Fax Viewer

racheal.me
11-18-2007, 11:27 PM
Hi,


How can I re-write the below code? If I have 10 records of data & images and I want to display them in one report. But I do not want one record per page. Display all in the same page.

##################

Option Compare Database
Option Explicit

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
On Error GoTo Err_Sub
If IsNull(PicFile) Then
[imgPicture].Visible = False
[imgPicture].Picture = ""
Else
[imgPicture].Visible = True
[imgPicture].Picture = PicFile
End If
Exit Sub
Err_Sub:
If Err = 2220 Then
[imgPicture].Visible = False
[imgPicture].Picture = ""
Else
MsgBox Err.Description, vbExclamation
End If
End Sub

Private Sub Report_NoData(Cancel As Integer)
MsgBox "There are no data for this report. Canceling report...", vbInformation
Cancel = True
End Sub

#################

Oldsoftboss
11-19-2007, 10:41 AM
Simply make the image on the report smaller, delete the txtcover (not sure why thats there anyway), and move the report footer up. No re-coding required.

racheal.me
11-20-2007, 12:30 AM
Thank you so much. I manage to insert images at every records by seeing your sample file.

Oldsoftboss
11-20-2007, 01:08 AM
Cheers....

Dave