Hent dimentioner på jpg og gif billeder

Set Image = Server.CreateObject("AspImage.Image")
Image.GetImageFileSize "d:\inetpub\wwwroot\selek\2007\images\shop.gif",xSize,ySize
Response.Write "Image Height = " & Image.MaxY & " - Image Width = " & Image.MaxX & "<BR>"
set image = nothing


Har prøvet med dette, men får bare 0 i bredde og højde

aller øverst i deres dokumentation står følgende;

- Create GIF* (RLE encoding only. Loading of GIFs not supported) JPG, PNG, BMP, TGA and PCX format images.

Fik denne til at virke.. OGSÅ med .gif filer



Function filstorrelse(strFil)
Set Image = Server.CreateObject("AspImage.Image")
Image.GetImageFileSize Server.Mappath("\" & strFolder &  Request.Querystring("mappe") & strFil), intX, intY
Response.Write intX & " x " & intY
Set Image = Nothing
End Function