Asp添加图片水印
Asp代码：
<%
set obj=server.CreateObject("wsImage.Resize")
obj.LoadSoucePic server.mappath("25.jpg")
obj.LoadImgMarkPic server.mappath("blend.bmp")
obj.Quality=75
obj.AddImgMark server.mappath("imgMark.jpg"), 315, 220,&hFFFFFF, 70
strError=obj.errorinfo
if strError<>"" then
response.write obj.errorinfo
end if
obj.free
set obj=nothing
%>
相关文档：
上下文对象
===================================
一种对象，它当MTS服务器组件在一个活动中运行时跟踪该组件的属性，包括被跟踪组件的激活状态、安全信息、事务处理状态（如果存在）等。这样就免除了让组件去跟踪其自身状态。
上下文对象是web服务器上基于web应用的一个背景环境对象，上下文对象提供了一个同一web应用 ......
主目录,配置下别忘了启用父目录
问题症状：
ADODB.Connection 错误 '800a0ea9' 未指定提供程序，也没有指派的默认提供程序。
问题分析：
Windows 64位的系统上，运行下列32bit(位)应用程序，不能够完全兼容，需要独立操作解决。程序列表如下：
Internet服务API扩展
ISAPI过滤器
ASP应用程序
ASP.NET应用程序
� ......
<%
Response.Buffer = true
Response.Clear
dim url
Dim fso,fl,flsize
dim Dname
Dim objStream,ContentType,flName,isre,url1
Dim strFileName
strFileName=replace(replace(Request("file"),"\",""),"/","") '传参
strFileName="/files/"&strFileName ' 改成你你文件的存 ......
Sub CreateAccessDB(DBToCreate)
Dim catNewDB ' As ADOX.Catalog
Set catNewDB = Server.CreateObject("ADOX.Catalog")
catNewDB.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & se ......
