Bonjour,
Il y a du progrès : bizarrement je réussis à le faire fonctionner en local sur mon IIS mais pas sur le serveur...
Voici le source image.asp :
Code: Select all
Dim Path, File
Path = Server.MapPath("/images")
File = rstResults("Path")
call RegExpTest(".jpg|.tif|.psd|.ico|.gif|.png|.eps|.bmp|.pdf|.ai", rstResults("Path"))
Set Image = server.createobject("GflAx.GflAx")
const AX_JPEG = 3
const AX_To16Colors = 16
With Image
.EpsDpi = 72
.EnableLZW = True
.LoadBitmap File
.Saveformat = AX_JPEG
%>
<table width="100%" border="0" cellspacing="2">
<tr align="center" valign="top">
<td colspan="4">
<img src="/thumbnail.asp?Path=<%=File%>" alt="<%=PathToVpath(rstResults("Directory"))%>">
</td>
...
et le source thumbnail.asp :
Code: Select all
<%
Response.Clear
Response.Buffer = True
Dim File
File = request.QueryString("Path")
Set ThumbNail = server.createobject("GflAx.GflAx")
const AX_JPEG = 3
const AX_To16Colors = 16
With ThumbNail
.EpsDpi = 72
.EnableLzw = True
.LoadBitmap File
.Saveformat = AX_JPEG
newWidth = 300 'Get the height according to the width (keep the ratio)
newHeight = (newWidth * .Height) / .Width
.Resize newWidth, newHeight 'Resize the pciture
response.contenttype = "image/jpeg"
response.binarywrite .SendBinary
end with
set ThumbNail=nothing
%>
J'ai installé GS 8.14 sur les 2 machines avec GSView 4.6. La seule différence entre les 2 machines est que je n'ai pas rebooté le serveur... Faut il le faire ? Sinon bien sûr les sources sont strictement les mêmes.
J'ai copié aussi la dll de GS dans winnt/system32 sur les 2 machines.
J'ai vérifié que la dll de GS étaient bien accessible sur le serveur.
Toujours la même erreur sur le serveur :
GflAx.GflAx.1 error '80004005'
Unknown format
/image.asp, line 18
Ligne 18 est .LoadBitmap File
Merci de votre aide
David ARNOULT