iRe.Open "select top 1 * from yuangong_info order by id desc", iConc, adOpenKeyset, adLockReadOnly
请问"top 1" 是不是指数据库中第一行？如果我想从数据库中任意调出某个人的照片，代码怎么写？我试了好几次，都提示有错误！请大家帮帮忙

将top 1去掉..然后加个where就行..

好的，可能是我的语句有问题，可以了，谢谢purana版主，帮我解决了很多问题！

Set iStm = New ADODB.Stream
With iStm
.Mode = adModeReadWrite
.Type = adTypeBinary
.Open
.Write iRe("photo")
'这里注意了,如果当前目录下存在test1.jpg,会报一个文件写入失败的错误.
.SaveToFile App.Path & "\4.jpg"
End With
Picture1.Picture = LoadPicture(App.Path & "\4.jpg")
'关闭对象
iRe.Close
iStm.Close


这是你回答别人的问题，‘写入失败’的问题怎么解决呢？

问题解决了！加个kill语句就可以了