ynqjxwz
谢谢你给我的例程,但我不想通过绑定数据库调用,因为我还想从网上调用它。
我是这样想的
Dim bit() As Byte
Open "C:\WINDOWS\安装程序.bmp" For Binary As #1
ReDim bit(LOF(1)) As Byte
Get 1, 1, bit
Close 1
然后将字节数组存于数据库中,但ACCESS里没有BINARY的字段类型,不知道怎样写进去
调用的时候读出字节数组
就是不知道怎样写进与读出
然后将字节数组的内容拼装成文件
Open "c:\1.bmp" For Binary As #1
Put 1, 1, bit1
Close 1
Me.Picture = LoadPicture("c:\1.bmp")