获得图片大小

关键词：获得图片大小，asp获得图片大小，asp获得图片属性



<%

set obj=server.CreateObject("wsImage.Resize") ''调用组件

obj.LoadSoucePic server.mappath("25.jpg") ''打开图片,图片名字是25.jpg

obj.GetSourceInfo iWidth,iHeight

response.write "图片宽度:" & iWidth & "<br>" ''获得图片宽度

response.write "图片高度:" & iHeight & "<br>" ''获得图片高度

strError=obj.errorinfo

if strError<>"" then

response.write obj.errorinfo

end if

obj.free

set obj=nothing

%>