我这段aspjpeg在asp里面放到上传组件里面的调用为什么总是报错

Dim Jpeg : Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath("picture\"&Newname&"")
L = 2000
Jpeg.Width = L
Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth
Jpeg.Save Server.MapPath("picture\"&Newname&"")
Set Jpeg=nothing
Response.write(Server.MapPath("picture\"&Newname&""))
大家看看我这段aspjpeg在asp里面放到上传组件里面的调用为什么总是报错，单独写成asp文件不会错。

 Server.CreateObject("Persits.Jpeg")
这个组件有么，注册了么？

Server.MapPath("picture\"&Newname&"")
->
Server.MapPath("~\picture\"&Newname&"")
确保你的程序目录下有picture并且有权限