AspJpeg为何不能生成缩略图,500分求助
以前安装了一个AspJpeg,能生成缩略图(没留意是什么版本)。后来重装了系统,装了AspJpeg1.5(后来改成1.6),把ASPJpeg.dll文件copy到系统目录system32目录里面,然后在cmd中输入regsvr32 c:\windows\system32\aspjpeg.dll,提示我注册成功。IIS里也能看到正常运行的AspJpeg,用Asp组件指针也能找到Persits.Jpeg项目。我想安装应该不成问题了,整个代码如下:
Dim Jpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' 打开
Jpeg.Open Src
' 是否推荐到首页
if trim(ComAddr)="1A" then
Jpeg.Width = 546
Jpeg.Height = 370
Jpeg.Save Server.MapPath(ImgPath&Comname)
ComSrc = ImgPath&Comname
End if
if Jpeg.OriginalWidth > 160 then
Jpeg.Width = 160
Jpeg.Height = Jpeg.OriginalHeight/(Jpeg.OriginalWidth / 160)
elseif Jpeg.OriginalHeight>120 then
Jpeg.Height = 120
Jpeg.Width = Jpeg.OriginalWidth/(Jpeg.OriginalHeight / 120)
else
Jpeg.Width = Jpeg.OriginalWidth
Jpeg.Height = Jpeg.OriginalHeight
end if
Jpeg.Save Server.MapPath(ImgPath&Smallname)
Set Jpeg = Nothing
以上的Src、ImgPath和Comname、Smallname在此均有正常的显示值,所以多余的代码我就没有贴上来,各位高人指点一下,为什么上传图片成功,但就是在AspJpeg这里没有生成缩略图,这个问题困扰我二三天了!!!!