日韩精品中文字幕一区二区-日韩精品中文字幕一区-日韩精品中文字幕视频-日韩精品在线一区二区三区-第一页在线-第一福利视频

當前位置:首頁文章首頁 IT學院 IT技術

關于Aspjpeg簡例的學習分享

作者:  來源:  發布時間:2011-6-14 15:14:24  點擊:
 這篇文章主要跟大家提供的是關于Aspjpeg簡例的分享,希望能給大家帶來幫助或啟發。
Set objImg = Server.CreateObject("Persits.Jpeg")
objImg.Interpolation = 2
\\\'影像加強 0-2
objImg.open xFilePath
response.write "<:::原始值:::>
AspJpeg版本=" & objImg.Version & "
寬=" & objImg.OriginalWidth & "像素
" & "高=" & objImg.OriginalHeight & "像素
"
response.write "品質=" & objImg.Quality & " (0-100)
" & "路徑=" & objImg.Version & "
"

\\\'objImg.Width = objImg.OriginalWidth / 2
\\\'變更圖片寬度(范例為50%)
\\\'objImg.Height = objImg.OriginalHeight / 2
\\\'變更圖片高度(范例為50%)
\\\'objImg.Sharpen 2, 250
\\\'銳利處理
\\\'objImg.Crop 0,0,150,150
\\\'切割處理
\\\'objImg.FlipH
\\\'左右翻轉
\\\'objImg.FlipV
\\\'上下翻轉
\\\'objImg.RotateL
\\\'向左旋轉90度
\\\'objImg.RotateR
\\\'向右旋轉90度

\\\' 將圖片秀上文字:------------------------
objImg.Canvas.Font.Color = &HFF0000
\\\'顏色
objImg.Canvas.Font.Family = "細明體"
\\\'字型
objImg.Canvas.Font.Bold = True
\\\'是否使用粗體
objImg.Canvas.Font.BkMode = False
\\\'是否使用字體背景色
objImg.Canvas.Font.BkColor = &H000000
\\\'字體背景色
objImg.Canvas.Font.Italic = False
\\\'是否使用斜體字
objImg.Canvas.Font.Rotation = 0
\\\'字體旋轉角度
objImg.Canvas.Font.ShadowColor = &H000000
\\\'字影顏色
objImg.Canvas.Font.ShadowXOffset = 50
\\\'字影X坐標
objImg.Canvas.Font.ShadowYOffset = 150
\\\'字影Y坐標
objImg.Canvas.Font.Size = 14
\\\'字體大小
objImg.Canvas.Font.Underlined = True
\\\'是否加底限
objImg.Canvas.Circle 100,100,10
\\\'畫圓圈
objImg.Canvas.Pen.Color = &H009900
\\\'畫圓的圓內填滿顏色
objImg.Canvas.Pen.Width = 1
\\\'畫圓的圓周粗細值
objImg.Canvas.Ellipse 0,0,150,150
\\\'畫橢圓
objImg.Canvas.Line 0,0,150,150
\\\'畫線
\\\'objImg.Canvas.Arc = 100,50,0,200
\\\'---不清楚這個用法--

objImg.Canvas.Print 100, 100, "I am Odysseus" ,136
\\\'位置及文字---------------------------------


\\\' 編輯圖片外框:----------------------------
objImg.Canvas.Pen.Color = &H000000
\\\'圖片外框顏色
objImg.Canvas.Pen.Width = 1
\\\'圖片外框寬度(像素)
objImg.Canvas.Brush.Solid = False
\\\'是否使用區域內填滿
objImg.Canvas.Brush.Color = &HFF0000
\\\'區域內填滿顏色
objImg.Canvas.Bar 5, 5, objImg.Width, objImg.Height
\\\'框線產生位置------------------------------

objImg.save xFileCopyToPath
response.write "<:::變化后:::>
寬=" & objImg.Width & "像素
" & "高=" & objImg.Height & "像素
"
Set objImg = Nothing

相關軟件

文章評論

軟件按字母排列: A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
主站蜘蛛池模板: 丰崎爱生| 抖音 下载| 电影继母劳拉| 新奥特曼2| 日本午夜电影| 老友记| 李保田最经典十部电影| 希崎| 李志毅| 中医基础理论试题题库及答案 | 《遇见你之后》电影在线观看| 电视剧一帘幽梦| 邓稼先教学设计一等奖优秀教案| 乱世伦情 电影| 红色诗集手抄报简单又漂亮| overwatch| 真实游戏完整版高清观看| 电影《追求》| 贵州三日游| 小镇姑娘电影| 祝福语生日| 妈妈的朋友泡妞| 40集电视连续剧人生之路| 杨紫和肖战演的电视剧是什么| 嗯啊不要啊啊啊| 黄晓明鹿鼎记| cctv17农业农村频道在线直播| 《天底良知》电视剧| 台州林毅| 《美景之屋| 奔跑吧第13季最新一期| 秀人网朱可儿| 漂亮小蜜桃| 六一儿童节幕后换演出服| 乳糖不耐受奶粉推荐| 武汉日夜| kiss the rain钢琴谱| 朋友的女朋友电影| 特殊的精油| 2018年党课主题及内容| 大连酒店|