AspJpeg 组件权限的检测

AspJpeg 作为图片处理的服务器组件应用非常广泛，在 WindsPhoto 相册中关于 aspjpeg 的应用有很多，缩略图、文字水印、图片水印都有用到。

为了兼容空间不支持 aspjpeg 的用户，加入了 aspjpeg 的检测，包括是否存在以及权限的检测。

1
Set Jpeg = Server.CreateObject("Persits.Jpeg")
2
'Response.Write Jpeg.Expires
3
if -2147221005=Err or Jpeg.Expires<now() then
4
..............
5
end if
6
Set Jpeg = nothing

-2147221005=Err 这句是检测组件是否存在，这样是不够的，即使存在的 aspjpeg 主机也可能没有注册组件，也就是没有权限。

Response.Write Jpeg.Expires 可以查看出主机到期的时间，用 Jpeg.Expires 和当前时间对比，如果小于当前时间就说明没有权限。也就是 or 后面那句 Jpeg.Expires<now() 。