imageresizer.Plugins.Watermark on classic asp

Question

我需要使用此插件爲使用經典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" 

Answer 1

爲什麼你要創建一個層的實例？ TextLayer和ImageLayer是你想要使用的類

我會放下與'圖層'有關的所有東西，然後試試這個。

textLayer.fill = True 

wm.NamedWatermarks("sfdf") = textLayer 

您還需要"watermark=sfdf"，而不是「tessst」