MACROMEDIA COLDFUSION STUDIO 5-USING COLDFUSION 5 STUDIO Use Manual page 227

Application Object
}
}
}
GetImageHeight
Syntax
GetImageHeight(const wsImageName: WideString): Integer;
Description Returns the height in pixels of the passed image. Returns
Example
/*
Tests GetImageHeight, GetImageWidth
Looks for first GIF image in current directory
*/
function Main(){
with (Application) {
aFileObj= new ActiveXObject("Scripting.FileSystemObject");
aFolder= aFileObj.GetFolder(CurrentFolder);
aFiles= new Enumerator(aFolder.files);
sExtToTest= 'gif';
sFile= '';
for (; !aFiles.atEnd(); aFiles.moveNext()){
}
if (!sFile == ''){
}
else{
}
}
ActiveDocument.InsertText('<p></p>', false);
if (aFileObj.GetExtensionName(aFiles.item())
== sExtToTest){
sFile = aFiles.item();
break;
}
sMsg = sFile + '\n\n' + 'Height = ' +
GetImageHeight(sFile) + '\n';
sMsg = sMsg + 'Width = ' + GetImageWidth(sFile);
MessageBox(sMsg, 'GetImageHeight/Width Test', 0);
MessageBox('No images found in current directory',
'GetImageHeight/Width Test', 0);
209
on error.
0