set UpdateRs=Server.CreateObject("ADODB.Recordset")
UpdateRs.Open "SELECT * FROM qy_QyRy where Ryid="&RyId,conn,2,3
set ofile=upfile.file("file1")
if ofile.filesize>1 then
UpdateRs("photo")=upfile.FileData("file1")
end if
UpdateRs.update
UpdateRs.close()
set UpdateRs=nothing
其中数据集的打开方式应该设为 2,3 不然就存不进二进制数据了,
但奇怪如果是Access数据库 1,3却可以
UpdateRs.Open "SELECT * FROM qy_QyRy where Ryid="&RyId,conn,2,3
set ofile=upfile.file("file1")
if ofile.filesize>1 then
UpdateRs("photo")=upfile.FileData("file1")
end if
UpdateRs.update
UpdateRs.close()
set UpdateRs=nothing
其中数据集的打开方式应该设为 2,3 不然就存不进二进制数据了,
但奇怪如果是Access数据库 1,3却可以