ASP生成jpeg图片
<%
if request("username")<>"" then
username=request("username")
username1=request("username1")
username2=request("username2")
username3=request("username3")
Set Jpeg = Server.CreateObject("Persits.Jpeg")
PhotoPath = Server.MapPath("yuan") & "\jinwuh.jpg"
Jpeg.Open PhotoPath
'姓名
Jpeg.Canvas.Font.Color = &000000 'red 颜色
Jpeg.Canvas.Font.Family = "黑体" '字体
Jpeg.Canvas.Font.size = 15 '字体
Jpeg.Canvas.Font.Bold = true '是否加粗
Jpeg.Canvas.Print 166, 137, username'打印坐标x 打印坐标y 需要打印的字符
'姓名
Jpeg.Canvas.Font.Color = &000000 'red 颜色
Jpeg.Canvas.Font.Family = "黑体" '字体
Jpeg.Canvas.Font.size = 15 '字体
Jpeg.Canvas.Font.Bold = true '是否加粗
Jpeg.Canvas.Print 166, 159, username1'打印坐标x 打印坐标y 需要打印的字符
'姓名
Jpeg.Canvas.Font.Color = &000000 'red 颜色
Jpeg.Canvas.Font.Family = "黑体" '字体
Jpeg.Canvas.Font.size = 15 '字体
Jpeg.Canvas.Font.Bold = true '是否加粗
Jpeg.Canvas.Print 166, 180, username2'打印坐标x 打印坐标y 需要打印的字符
'姓名
Jpeg.Canvas.Font.Color = &00000 'red 颜色
Jpeg.Canvas.Font.Family = "黑体" '字体
Jpeg.Canvas.Font.size = 15 '字体
Jpeg.Canvas.Font.Bold = true '是否加粗
Jpeg.Canvas.Print 166, 201, username3
'打印坐标x 打印坐标y 需要打印的字符
Jpeg.Quality=100
Jpeg.Save Server.MapPath("create\jinwuh.jpg") '保存
end if
%>
联系我们
QQ：51193930(Ahoo)
MSN：auuocx@hotmail.com
网址：http://www.auuo.com
地址：慈溪天九商务中心525室
电话：189-0662-0882
我们的优势
拥有优秀的网站设计师与程序工程师，精通各种一流的图形设计软件，如Photoshop、Freehand CorlDraw、Flash、Dreamweaver、Fireworks等等制作网页和平面设计图。以及使用C语言、C#、ASP.NET框架、asp、php等语言为您开发项目，我们为您准备了最专业的技术服务。为您开发的网站精致实用，代码清晰，保证您的网站安全可靠修改方便，最重要的是符合市场需求，并随时为客户解决各种技术问题。
我们正在努力开拓...