内容载入中...
前些天用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")
