您现在的位置：程式碼之家 >> 數據庫知識 > >> SQL Server 資料庫 >> 關於SqlServer

用 SQL Server 為 Web 瀏覽器提供圖像（三）：ActiveX DLL 開發

編輯：關於SqlServer

使用 VB 5.0 開發 ActiveX DLL (ImageLoader)，負責連接 SQL Server、讀取 image 欄位資料、存成暫存檔供 ASP 取用。

專案建立步驟

VB File → New Project → ActiveX DLL，類別重命名 clsImageLoader，Instancing 保留 MultiUse。
Project → Properties → General，專案名 ImageLoader。
專案參考加入 Microsoft ActiveX Data Objects 1.5 Library（ADO）。

類別成員設計（表 A）

成員	類型	用途
DbName	Property Let	資料庫名稱
TableName	Property Let	資料表名稱
NameOfImageColumn	Property Let	圖片欄位名
NameOfImageTypeColumn	Property Let	圖片類型欄位（.gif/.jpg）
NameOfImageIdColumn	Property Let	圖片 ID 欄位
ImageFile	Property Get (ReadOnly)	回傳暫存檔完整路徑
OpenConnection	Method	開啟 ADO 連線
CreateTemplateImageFile	Method	讀取資料庫圖片並存檔

核心程式碼結構（列表 B 節錄）

Private mAdoConn As New ADODB.Connection
Private mAdoRst As New ADODB.Recordset
Private mstrDbName As String
Private mstrTableName As String
Private mstrImageColumnName As String
Private mstrImageTypeColumnName As String
Private mstrImageIdColumnName As String
Private mstrFileName() As String
Private mlngImageId() As Long
Private mlngNumberOfFiles As Long
Const BLOCKSIZE = 102400

Public Property Let DbName(ByVal strVal As String)
    mstrDbName = strVal
End Property
' ... 其他 Property Let / Get / Method 實作 ...

類別內含私有子程序：初始化、終結、開啟 Recordset、寫入檔案、錯誤處理。完整原始碼見原文列表 B。