DBへのJpeg保存

解決


カップ  2004-07-22 19:10:53  No: 114977  IP: [192.*.*.*]

jpeg画像をデータベースに形式をそのままで保存する方法を探しています。
過去ログに似たような投稿がいくつかありましたがバイナリで保存する方法
はあるようなんですが。
あちこち調べてはいるのですがわからずに困っています。

image列に保存Jpeg画像を保存したいのです

SQLServer2000 VB6.0 SP6 WindowsXPPro

編集 削除
りっとっと  2004-07-22 22:08:57  No: 114978  IP: [192.*.*.*]

ADODB.Streamオブジェクトを使ってDBに入れることができます。
    Dim rs As ADODB.Recordset
    Dim stm As ADODB.Stream
    stm.Type = adTypeBinary
    stm.Open
    
    'DBに入れる場合
    stm.LoadFromFile "c:\testIn.jpg"
    rs.Fields("Image").Value = mstream.Read
    
    'DBから取得する場合
    stm.Write rs.Fields("Image").Value
    stm.SaveToFile "c:\testOut.jpg"
    
    rs.Update
    stm.Close
    rs.Close

編集 削除
カップ  2004-07-23 16:38:32  No: 114979  IP: [192.*.*.*]

りっとっとさんありがとうございました。
DBの更新できました。

編集 削除