<%
    Set Upload = Server.CreateObject("Persits.Upload")'创建对象实例

    Upload.SetMaxSize 100000, True
    ' 保存在内存中，省略路径参数    
    Count = Upload.Save
    ' 获得图片对象
    Set File = Upload.Files("proimage")
            proid=Upload.Form("proid")
        proname=Upload.Form("proname")
        proprice=Upload.Form("proprice")
        procount=Upload.Form("procount")
        prointro=Upload.Form("prointro")
        Set rs = Server.CreateObject("adodb.recordset")

        rs.Open "select * from product where proid='"&proid&"'", Conn, 1, 2
                rs("proid")=proid
        rs("proname")=proname
        rs("proprice")=proprice
        rs("procount")=procount
        rs("prointro")=prointro
        rs("updatetime")=date()
        rs("proimage") = File.Binary  '获取图片二进制数据
        rs.Update
        rs.Close
        set rs=Nothing        
        conn.close
        set conn=nothing
%>
主要是修改记录中的图片

怎么总是提示rs("proimage") = File.Binary  '获取图片二进制数据

缺少file 对象啊？这Set File = Upload.Files("proimage")不是已经设置了吗？