急急！！ASP上传图片问题

Question

dim Upload
Set Upload = Server.CreateObject("Persits.Upload") Upload.SetMaxSize 1000000, True
'dim Count
Count = Upload.Save(server.MapPath("../upload/"))
Upload.OverwriteFiles = False  dim imgfile
Set imgfile = Upload.Files("imgfile")
filename=imgfile.FileName If not imgfile Is Nothing Then dim sql
sql = "insert into images(img_name,img_desc,addtime,author) values('"&filename&"','"&Upload.Form("imgdesc")&"','"&now()&"','"&session("account")&"')"

doSQL(sql)

response.Write("<script language=javascript>alert('上传成功！');history.back();</script>")
Else
Response.Write ("Failed")
End If
错误代码：Count = Upload.Save(server.MapPath("../upload/"))
错误描述：没有 MTS 对象上下文

Answer 1

没用过Persits组件，以前我是自己编写了一个上传的组件，有时也使用ADO组件。
你的代码说明COM组件Pertsits的IDispatch接口创建不成功。
你可以用TypeName(Upload)查看Upload对象的数据类型，是否创建成功。
接口Upload是否支持Save方法。