用JPEG文件EXIF信息ASP版本(1)

80酷酷网    80kuku.com

  前些天用bcb写了一个EXIFINFO的组件。其实用ASP也可以实现。
用ASP性能上要稍差一些,不过可以采取预读取形式存库,一张图片处理一次。


functions_exif.asp start
----------------------------
<%

const TristateUseDefault = -2
const TristateTrue = -1
const TristateFalse = 0

const ForReading = 1
const ForWriting = 2
const ForAppending = 8

const m_BYTE = 1
const m_STRING = 2
const m_SHORT = 3
const m_LONG = 4
const m_RATIONAL = 5
const m_SBYTE = 6
const m_UNDEFINED = 7
const m_SSHORT = 8
const m_SLONG = 9
const m_SRATIONAL = 10
const m_SINGLE = 11
const m_DOUBLE = 12

const ExifOffset = "8769"
const MakerNote = "927C"

Public ExifLookup
set ExifLookup = Server.CreateObject("Scripting.Dictionary")

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: