« 上一篇下一篇 »

Aspjpeg简例

Aspjpeg简例
<%


Set objImg = Server.CreateObject("Persits.Jpeg")
objImg.Interpolation = 2
\\\'影像加强 0-2
objImg.open xFilePath
htm = htm& "<:::原始值:::> AspJpeg版本=" & objImg.Version & "宽=" & objImg.OriginalWidth & "像素" & "高=" & objImg.OriginalHeight & "像素"
htm = htm& "品质=" & 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
htm = htm& "<:::变化后:::>宽=" & objImg.Width & "像素" & "高=" & objImg.Height & "像素"
Set objImg = Nothing
%> 

Leave a Comment

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。