<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<head><meta forua="true" http-equiv="Cache-Control" content="max-age=0" /></head>
<card title="UEditor（ASP版）自动提交上传图片并添加水印的示例代码" id="card1">
<p> 游客</p><p>
标题:UEditor（ASP版）自动提交上传图片并添加水印的示例代码<br/>
正文:<br/>
先下载ueditor（ASP版），然后找到：ueditor\ueditor.config.js文件：//启用自动保存, enableAutoSave: true, autoSyncData: true//自动同步编辑器要提交的数据找到：\ueditor\asp\Uploader.Class.asp 文件，修改代码为：Private Function DoUpload( stream, filename )rsFileSize = stream.Size If rsFileSize &amp;gt; cfgMaxSize Then rsState = stateString.Item( &amp;quot;SIZE_LIMIT_EXCCEED&amp;quot; ) Exit Function End IfrsOriginalFileName = filename fileType = GetExt(filename) If CheckExt(fileType) = False Then rsState = stateString.Item( &amp;quot;TYPE_NOW_ALLOW&amp;quot; ) Exit Function End If  Set formatter = new PathFormatter rsFilePath = formatter.format( cfgPathFormat, filename )  savePath = Server.MapPath(rsFilePath) CheckOrCreatePath( GetDirectoryName(savePath) )stream.SaveToFile savePath stream.Close'======================================================camnpr.com Dim Jpeg  Set Jpeg = Server.CreateObject(&amp;quot;Persits.Jpeg&amp;quot;)  Jpeg.Open savePath ' 图片所在位置  Dim aa  aa=Jpeg.Binary '将原始数据赋给aa  '=========加文字水印=================  Jpeg.Canvas.Font.Color = &amp;amp;Hcccc<br/><a href="http://camnpr.com/wap.asp?mode=WAP&amp;act=View&amp;id=1687&amp;Page=1">[&lt;&lt;]</a><a href="http://camnpr.com/wap.asp?mode=WAP&amp;act=View&amp;id=1687&amp;Page=1">[[1]]</a><a href="http://camnpr.com/wap.asp?mode=WAP&amp;act=View&amp;id=1687&amp;Page=2">[2]</a><a href="http://camnpr.com/wap.asp?mode=WAP&amp;act=View&amp;id=1687&amp;Page=2">[&gt;&gt;]</a><br/>
<br/>
<a href="wap.asp?act=Com&amp;id=1687">查看评论(0)</a><br/>
<a href="wap.asp?act=AddCom&amp;inpId=1687">发表评论</a><br/><br/>

<br/>

<br/>
<a href="http://camnpr.com/wap.asp">首页</a>
</p>
</card>
</wml>