ASP wsImage组件是一个专用于在ASP环境下处理图像的工具，尤其适用于添加水印功能。这个组件由中国人开发，提供了中文界面，因此对于中文用户来说更加友好且易于操作。通过使用wsImage，开发者可以轻松地在图片上添加文字或图像水印，调整水印的位置、透明度、角度等属性，以实现个性化的图像处理效果。
添加水印的过程通常分为几个步骤：
1. 安装与注册组件：
在使用wsImage之前，你需要先下载该组件的DLL文件，然后在命令提示符下使用`regsvr32`命令进行注册。例如，如果DLL文件位于C盘的`wsImage`目录下，你可以输入`regsvr32 C:\wsImage\wsImage.dll`来完成注册。
2. 获取图片信息：
使用`wsImage.Resize`对象的`LoadSoucePic`方法加载待处理的图片，然后调用`GetSourceInfo`方法获取图片的宽度和高度。以下是一个简单的示例代码：
```
<%
set obj = Server.CreateObject("wsImage.Resize")
obj.LoadSoucePic Server.MapPath("25.jpg")
obj.GetSourceInfo iWidth, iHeight
Response.Write "图片宽度：" & iWidth & "<br>"
Response.Write "图片高度：" & iHeight & "<br>"
'释放对象资源
obj.Free
Set obj = Nothing
%>
```
3. 添加文字水印：
要在图片上添加文字水印，你可以设置`wsImage.Resize`对象的相关属性，如`TxtMarkFont`（文字字体）、`TxtMarkBond`（文字粗细）、`MarkRotate`（旋转角度）等，然后调用`TxtMark`方法。下面是一个添加文字水印的例子：
```
<%
set obj = Server.CreateObject("wsImage.Resize")
obj.LoadSoucePic Server.MapPath("25.jpg")
obj.Quality = 75 '设置输出质量
obj.TxtMarkFont = "华文彩云" '设置水印文字字体
obj.TxtMarkBond = False '设置水印文字不加粗
obj.MarkRotate = 0 '设置水印文字旋转角度
obj.TxtMark "水印文字", 0, 0, 50, 50, 100, 50 '设置水印文字内容、位置、透明度等参数
obj.SaveTargetPic Server.MapPath("output.jpg"), 1 '保存处理后的图片到output.jpg
obj.Free
Set obj = Nothing
%>
```
这里的参数分别代表：水印文本、X坐标、Y坐标、水平偏移、垂直偏移、透明度（百分比）以及文字大小。
4. 添加图像水印：
如果你想添加图像水印，可以使用`ImgMark`方法，类似于`TxtMark`，但需要提供图像文件的路径。需要注意的是，图像水印的透明度通常通过调整其alpha通道来实现。
5. 错误处理：
在处理过程中，可以通过检查`obj.ErrorInfo`属性来获取可能出现的错误信息，如果返回的字符串不为空，说明出现了错误，可以通过`Response.Write`输出错误信息。
通过上述步骤，开发者可以在ASP环境中高效地为图片添加个性化水印，增强图片的版权保护或美观性。值得注意的是，实际使用时，根据具体需求调整参数，如水印位置、颜色、透明度等，以达到最佳视觉效果。
我的内容管理
展开
