|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码aspjpeg|通明手艺撑持:
1、aspjpeg能对图片水印举行通明度调剂,不克不及对笔墨水印调剂,
2、aspjpeg撑持Binary,能够Jpeg.OpenBinary读取,能够Jpeg.sendBinary,也可Jpeg.Binary赋值
思绪:
1、把原始的图片数据二进轨制赋值给TempA,
2、将笔墨水印处置后的图片数据二进制赋值给TempB,
3、以TempB作为"图片水印",附加在TempA上,调剂通明度,输入就ok了
思绪很复杂,代码也很复杂:
<%
LocalFile="d:apple.jpg"
TargetFile="d:myapple.jpg"
DimJpeg
SetJpeg=Server.CreateObject("Persits.Jpeg")
IfErr.Number=-2147221005then
Response.write"没有这个组件,存候装!"反省是不是安装AspJpeg组件
Response.End()
EndIf
Jpeg.Open(LocalFile)翻开图片
Iferr.numberthen
Response.write"翻开图片失利,请反省路径!"
Response.End()
Endif
DimTempA原始图片的二进制数据
DimTempB加了不通明笔墨水印的图片
DimTempC最后的效果
TempA=Jpeg.Binary将原始数据赋给TempA
=========加笔墨水印=================
Jpeg.Canvas.Font.Color=&Hfffffff水印笔墨色彩
Jpeg.Canvas.Font.Family=Arial字体
Jpeg.Canvas.Font.Bold=True是不是加粗
Jpeg.Canvas.Font.Size=35字体巨细
Jpeg.Canvas.Font.ShadowColor=&H000000暗影色采
Jpeg.Canvas.Font.ShadowYOffset=1
Jpeg.Canvas.Font.ShadowXOffset=1
Jpeg.Canvas.Brush.Solid=True
Jpeg.Canvas.Font.Quality=5输入质量
Jpeg.Canvas.PrintTextJpeg.OriginalWidth/2-150,Jpeg.OriginalHeight/2,"www.Tsingfeng.com"水印地位及笔墨
TempB=Jpeg.Binary将笔墨水印处置后的值赋给TempB,这时候,笔墨水印没有不通明度
============调剂笔墨通明度================
SetMyJpeg=Server.CreateObject("Persits.Jpeg")
MyJpeg.OpenBinaryTempA
SetLogo=Server.CreateObject("Persits.Jpeg")
Logo.OpenBinaryTempB
MyJpeg.DrawImage0,0,Logo,0.20.3是通明度
TempC=MyJpeg.Binary将终极了局赋值给TempC,这时候也能够天生方针图片了
response.BinaryWriteTempC将二进输入给扫瞄器
MyJpeg.Save(TargetFile)
setTempA=nothing
setTempB=nothing
setTempC=nothing
Jpeg.close
MyJpeg.Close
Logo.Close
%>使用cdonts,可以发送、查看邮件,实现webmail的功能。结合wsh,可以实现对nt主机的管理,如nt用户管理、iis虚拟主机设置、exchange邮箱设置等等,就像管理本地机一样方便。 |
|