存储图片的问题

Question

  我往一个表里添加图片，其中一条记录添加图片成功了，当点其它记录保存图片时，没有保存到数据库啦！下面是我的保存图片的代码：
   
Open filename For Binary As #1
  
ReDim pdatabyte(FileLen(filename))
 Get #1, , pdatabyte
 Close #1
persondatasource.Fields("pphoto").AppendChunk (pdatabyte)
我用MsgBox测试过了，两次保存图片都执行到这段代码了，可是为什么第二次就没保存到数据库呢？ 我猜想是不是数据库缓冲满了？？还是？ 望高手帮我解答！万分感谢！！