>I'm generating webpages with some images in them. The slow part is getting the image size, which I do by
>
>
>loImg=LoadPicture(lcFajl)
>lnWidth=Round(loImg.Width/26.458,0)
>lnHeight=Round(loImg.Height/26.458,0)
>
>
>The first line is the slow part. I seem to remember these attributes can be extracted, given the filename, by some feature of scripting.filesystemobject that I can't find now.
>
>I think I saw something like that in the last ten days or so, but me.memory.refresh() returns .f. - so, is there anyone with better memory?
Here what I found:
(It is VB but its easy to convert :-))
dim myImg, fs
Set fs= CreateObject("Scripting.FileSystemObject")
if not fs.fileExists(img) then exit sub
set myImg = loadpicture(img)
iWidth = round(myImg.width / 26.4583)
iheight = round(myImg.height / 26.4583)
set myImg = nothing
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.