发现BUG

缩略图裁切方式Position设置后无效

• 默认为从中间截图
• top: 从顶部开始截图
• left: 从左侧开始截图
• right: 从右侧开始截图
• bottom: 从底部开始截图
• topleft or lefttop: 从左上角开始截图
• topright or righttop: 从右上角开始截图
• leftbottom or bottomleft: 从左下角开始截图
• rightbottom or bottomright: 从右下角开始截图
• X,Y: 指定值方式，即Position='-10,-20'

 
<img src="(king:image width="250" height="150" Position="top"/)">


无论Position值设置成什么都是默认从中间裁切，请版主帮助啊 ，裁切后的人物所录入图都是没有人头的，好恐怖啊！！！！！！

裁切后的图片都是这样的 ，急急急，谁知道在哪设置默认裁切方式

看 胸 臀 也很不错。

问题已经成功解决，感谢好友“登”的帮助，抱歉不知道他在论坛里叫什么了， 打开PAGE/SYSTEM/FUN.ASP 找到 public function jpeg(l1,l2,l3,l4) on error resume next'如果不出现错误..就true dim img,pimg,pwidth,pheight,nwidth,nheight dim x1,y1,x2,y2,ojpeg dim I2 jpeg=false if king_isjpeg=false or isobj(king_jpeg)=false or isexist(l1)=false then exit function set ojpeg=server.createobject(king_jpeg)'调用组件 if len(king_regkey)>0 then ojpeg.regkey =king_regkey ojpeg.open server.mappath(l1)'打开图片 pwidth=ojpeg.originalwidth pheight=ojpeg.originalheight if (pwidth/pheight)>=(l3/l4) then'宽度相对宽,以l4为基准缩放 nwidth=cint((pwidth/pheight)*l4) nheight=l4 ojpeg.width=nwidth ojpeg.height=nheight '显示坐标值 x1=int((nwidth-l3)/2):y1=0 x2=x1+l3:y2=l4 else nwidth=l3 nheight=cint((pheight/pwidth)*l3) ojpeg.width=nwidth ojpeg.height=nheight x1=0:y1=int((nheight-l4)/2) x2=l3:y2=y1+l4 end if ojpeg.crop x1,y1,x2,y2 '切割 ojpeg.sharpen 1,130 '创建目录 I2=split(l2,"/") if len(l2)>len(I2(ubound(I2))) then createfolder left(l2,len(l2)-len(I2(ubound(I2)))-1) ojpeg.save server.mappath(l2) if err.number=0 then jpeg=true if err.number<>0 then err.clear end function 将x1=0:y1=int((nheight-l4)/2) 改成x1=0:y1=0 即可解决截图问题

大S手中的产品估计N多