view tif image

Hi all,

I'm write this code to load image.. In a jpg format is ok ... what can I do
to work whit format tif
thanks for your help
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/information-technology/11825-view-tif-image.html



Private Sub Form_Current()
Dim strBase As String, strChemin As String
On Error GoTo err_plan
Me.Image.Picture = ""
' Répertoire de base
strBase = CurrentProject.Path & "\Plans livre renvoi\"

' Chemin complet de l'image
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=11825
strChemin = strBase & "1-0001.tif"

' Charger l'image
Me.Image.Picture = strChemin

exit_AfficherCroquis:
Exit Sub
err_plan:
Me.Image.Picture = ""
Resume exit_AfficherCroquis
End Sub

 
Do share your immediate thoughts or reactions on this issue? We value your views! Login Now! or Sign Up Today! to share your views with us.. Gurfateh!

Do not use Tiff's. You should use a Bitmap in most ms office procedures as
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=11825
this is what they are designed for. You can use the BMP to "hyper"link to
your Tiff in a seperate file if needed.


--
Wayne
Manchester, England.



"GhysBoy" wrote:

> Hi all,
>
> I'm write this code to load image.. In a jpg format is ok ... what can I do
> to work whit format tif
> thanks for your help
>
>
>
> Private Sub Form_Current()
> Dim strBase As String, strChemin As String
> On Error GoTo err_plan
> Me.Image.Picture = ""
> ' Répertoire de base
> strBase = CurrentProject.Path & "\Plans livre renvoi\"
>
> ' Chemin complet de l'image
> strChemin = strBase & "1-0001.tif"
>
> ' Charger l'image
> Me.Image.Picture = strChemin
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=11825
>
> exit_AfficherCroquis:
> Exit Sub
> err_plan:
> Me.Image.Picture = ""
> Resume exit_AfficherCroquis
> End Sub
>
>
>

TIFF Graphics Filter support was withdrawn in Office 2003. One solution that has been suggested is to
install the “Office XP Converter Pack” (which should still work in Office 2003). Microsoft withdrew the
XP Converter Pack from microsoft.com downloads (since it includes a potential security vulnerability) and
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=11825
replaced it with the 2003 Conversion Pack (which does not include TIFF). Apparently it is possible to
request the XP version from PSS. Alternatively I was able to find a download at the address below (note
that although this is a Swiss site, the converter pack appears to be generic or English). You do not need
to subscribe (as suggested by the second page) – just wait a few seconds for the download to start:

http://www.pctip.ch/downloads/dl/21796.asp

Since this pack may contain a potential security vulnerability you should evaluate the impact and risk,
and perhaps test the pack on a test system (I can’t say whether you can select only the TIFF filter in
order to reduce or mitigate any risk).

An alternative approach is to try Stephen Lebans’ LoadJjpegGif sample, which shows how to use the GDI+
library to display TIFF:

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

--
__________________________________________________ _____
DBPix 2.0: Add pictures to Access, Easily & Efficiently
http://www.ammara.com/dbpix/access.html




"GhysBoy" wrote:
>Hi all,
>
>I'm write this code to load image.. In a jpg format is ok ... what can I do
>to work whit format tif
>thanks for your help
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=11825
>
>
>
>Private Sub Form_Current()
>Dim strBase As String, strChemin As String
>On Error GoTo err_plan
>Me.Image.Picture = ""
>' Répertoire de base
>strBase = CurrentProject.Path & "\Plans livre renvoi\"
>
>' Chemin complet de l'image
>strChemin = strBase & "1-0001.tif"
>
>' Charger l'image
>Me.Image.Picture = strChemin
>
>exit_AfficherCroquis:
> Exit Sub
>err_plan:
> Me.Image.Picture = ""
> Resume exit_AfficherCroquis
>End Sub
>
>