国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

ASP固定比例裁剪縮略圖的方法

2024-05-04 11:05:19
字體:
來源:轉載
供稿:網友

aspjpeg是一個功能強大的圖像處理組件,它可以很容易地制作縮略圖并向圖像添加水印,下面是錯新技術頻道小編為大家整理的ASP固定比例裁剪縮略圖的方法,需要它的朋友可以進入下文了解一下。

一般生成縮略圖的方法有兩種:

第一種:縮放成固定大小的小圖片

第二種:縮放成等比例的小圖片

第一種方法的缺點是,會使圖片變形,例如一個身材苗條的MM變成一個胖MM

第二種方法的缺點是,如果圖片是放在一個表格中顯示,并且圖片寬高比和這個表格不同,就不能充滿整個表格,留下空隙,不好看

這里介紹的方法是“固定比例裁剪”,使用aspjpeg組件,也就是說,生成的縮略圖寬高比是固定的,但是不會變形。如果原圖的寬高比大于設定的寬高比,就會自動剪掉左右兩旁多余的圖;如果原圖的寬高比小于設定的寬高比,就會自動剪掉上下的多余的圖。

Function MakePic(sourcpic,newwidth,newheight,destpic) On error resume next MakePic=false Set Jpeg = Server.CreateObject(“Persits.Jpeg”) if Err then response.Write (“錯誤:空間沒安裝aspjpeg組件”) response.end end if Jpeg.Quality = 100 Jpeg.Open sourcpic jpeg.PreserveAspectRatio = True ‘等比縮放 if jpeg.OriginalWidth/jpeg.OriginalHeight > newwidth/newheight then'太扁了,要剪掉左右部分 jpeg.Height = newheight jpeg.crop CInt((jpeg.Width – newwidth)/2),0,CInt((jpeg.Width – newwidth)/2)+newwidth,newheight else ‘太高了,要剪掉上下部分 jpeg.Width = newwidth jpeg.crop 0,CInt((jpeg.Height – newheight)/2),newwidth,CInt((jpeg.Height – newheight)/2)+newheight end if Jpeg.Save destpic if err.number=0 then MakePic=True Jpeg.Close Set Jpeg=Nothing End function

上面內容是錯新技術頻道小編為大家愛介紹的ASP固定比例裁剪縮略圖的方法,希望能幫助大家學習。

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 新安县| 全椒县| 永城市| 赤峰市| 伊春市| 平潭县| 汉中市| 永修县| 兴文县| 周至县| 左权县| 名山县| 扎赉特旗| 钟山县| 明溪县| 汾西县| 南宫市| 伊吾县| 隆尧县| 鹤山市| 屯门区| 商水县| 甘南县| 手游| 龙江县| 随州市| 仁寿县| 阿克苏市| 本溪市| 濉溪县| 富平县| 新泰市| 桦甸市| 延安市| 洛阳市| 营口市| 兴城市| 扶余县| 霸州市| 托克逊县| 贵南县|