急

如何在sql数据库中存储图片(照片)?

解决方案 »

  1.   

    微软的答案：
    http://support.microsoft.com/default.aspx?scid=kb;EN-US;258038
      

  2.   

    Option ExplicitPrivate Sub Command1_Click()
        Dim rs As New ADODB.Recordset
        Dim photo() As Byte    Open "C:\aa.bmp" For Binary Access Read As #1
        photo = InputB(LOF(1), #1)
        Close #1
        
        rs.Open "select * from tablename", cn, adOpenDynamic, adLockPessimistic    rs.AddNew
        rs!photo.AppendChunk (photo)
        rs.Update
    End Sub