asp图片上传问题

错误提示：

Microsoft VBScript runtime 错误 '800a01a8'

Object required: ''
代码：

/admin/Inc/upload_Img.asp，行 49
用的是aspupload上传组件！
dim upfile,upload
set uopload=server.createobject("persits.upload")
Set upfile=upload.Files("upfile")【49行 提示出错的地方】
upfile.SaveAs Server.MapPath("./upload")&"\"&GetFileName(now())&upfile.Ext
帮个忙谢谢！！1