jpeg画像をデータベースに形式をそのままで保存する方法を探しています。
過去ログに似たような投稿がいくつかありましたがバイナリで保存する方法
はあるようなんですが。
あちこち調べてはいるのですがわからずに困っています。
image列に保存Jpeg画像を保存したいのです
SQLServer2000 VB6.0 SP6 WindowsXPPro
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
りっとっとさんありがとうございました。
DBの更新できました。