Asp classic 经典asp上的imageresizer.Plugins.Watermark

Asp classic 经典asp上的imageresizer.Plugins.Watermark,asp-classic,com+,imageresizer,Asp Classic,Com+,Imageresizer,我需要使用这个插件添加水印的图像使用经典的ASP。我的这项工作部分使用了以下代码: dim o, b, wm, layer,textlayer Set b = CreateObject("ImageResizer.Configuration.Config") Set wm = CreateObject("ImageResizer.Plugins.Watermark.WatermarkPlugin") Set textlayer = CreateObject("ImageResizer.P

我需要使用这个插件添加水印的图像使用经典的ASP。我的这项工作部分使用了以下代码:

dim o, b, wm, layer,textlayer 

Set b = CreateObject("ImageResizer.Configuration.Config")

Set wm = CreateObject("ImageResizer.Plugins.Watermark.WatermarkPlugin")

Set textlayer = CreateObject("ImageResizer.Plugins.Watermark.TextLayer")

Set layer = CreateObject("ImageResizer.Plugins.Watermark.Layer")

textlayer.Text = "Yeees"

textlayer.fontSize = 50


layer.fill = True

set layer("dd") = textlayer 'THIS IS FAILING

wm.NamedWatermarks("sfdf") = layer("dd") 'THIS IS FAILING TOO

wm.Install(b)


b.BuildImage "C:\lg1_1361_44.jpg", "C:\lg1_1361_44_WATER.png", "watermark=tessst&format=png"

为什么要创建图层的实例?TextLayer和ImageLayer是您想要使用的类

我会删除所有与“图层”相关的内容,并尝试使用此选项

textLayer.fill = True

wm.NamedWatermarks("sfdf") = textLayer

您还需要
“watermark=sfdf”
而不是“tesst”

当您说它部分工作时发生了什么?谢谢您的回答,但是wm.NamedWatermarks(“sfdf”)是一个字典,所以我无法为它指定textlayer。对,您可以为每个名称指定多个层,因此您需要将其设置为一个包含1个元素的数组,textlayer。