读取保存图片的有关问题

读取保存图片的问题
我将照片放在服务器的文件夹里，在数据库里存放了路径，且数据库里有存放的信息了，但确读不出来，请帮忙指点下，问题是什么“
VB codeDim iConcstr As String
Dim iConc As ADODB.Connection

'保存文件到数据库中
Sub s_SaveFile()
  
  Dim iRe As ADODB.Recordset
  Dim iConcstr As String

  '打开保存文件的表
  Set iRe = New ADODB.Recordset
  With iRe
  .Open "select * from imge", iConc, 1, 3
  .AddNew '新增一条记录
  .Fields("photo") = "wenjinmin"
  .Update
  End With
   
   
  '完成后关闭对象
  iRe.Close
  
  Image1.Picture = LoadPicture() '清空
End Sub

Sub s_ReadFile()

  Dim iRe As ADODB.Recordset
  '打开表
  Set iRe = New ADODB.Recordset
'得到最新添加的纪录
  iRe.Open "select * from imge ", iConc, adOpenKeyset, adLockReadOnly
  If iRe.EOF Then '指针指向最后一条记录
  iRe.MoveFirst
  End If

  Image1.Picture = LoadPicture(iRe.Fields("photo").Value) '这里有问题说“类型不匹配 13”
  '关闭对象
  iRe.Close
  End Sub

Private Sub Command1_Click() ‘读取图片到image
  Call s_ReadFile
End Sub

Private Sub Command2_Click() ’保存文件路径打数据库imge表的“PHOTO”列
  Call s_SaveFile
End Sub

Private Sub Command3_Click() ‘打开文件夹，选择图片到image
   
  CommonDialog1.Filter = "图片文件(*.jpg)|*.jpg|所有文件(*.*)|*.*"
  CommonDialog1.ShowOpen '显示打开文件对话框
  wenjinmin = CommonDialog1.FileName '取得整个文件的存放路径
   
  Image1.Picture = LoadPicture(wenjinmin)

End Sub
Private Sub Form_Load()
  
  
'下面的语句是连接sqlserver数据库的.
  iConcstr = "rovider=SQLOLEDB.1ersist Security Info=True;" & _
  "User ID=saassword=sa;Initial Catalog=db_hsjs;Data Source=127.0.0.1"
  
  Set iConc = New ADODB.Connection
  iConc.Open iConcstr

End Sub

Private Sub Form_Unload(Cancel As Integer)
  iConc.Close
  Set iConc = Nothing
End Sub


[解决办法]
iRe.Fields("photo").Value
iRe.Fields("photo") 即可

数据库保存图片很多人都是用二进制方式保存, 但我皆以路径保存，楼主与我的做法是相同的

楼主可能将Photo这个字段的格式设为二进制了吧？是的话 改为 String 即可