Agregue la función de marca de agua a las imágenes y cree miniaturas para las imágenes 1. Agregue la función de marca de agua a las imágenes
JPEG tenue
Establecer Jpeg = Server.CreateObject(Persits.Jpeg) 'Crear objeto
Jpeg.Open BlogPath & /upload/ & FileName ' La ubicación de la imagen
Jpeg.Canvas.Font.Color = &H000000 ' Color, aquí está configurado en: negro
Jpeg.Canvas.Font.Family = Founder se convierte en fuente de conjunto simplificada
Jpeg.Canvas.Font.Bold = False 'Si se debe poner en negrita
Jpeg.Canvas.Font.Size = 26 'Tamaño de fuente
Jpeg.Canvas.Font.Quality = 4 ' Claridad del texto
Jpeg.Canvas.Print Jpeg.OriginalWidth/2-170,Jpeg.OriginalHeight-30, WWW.WILLIAMLONG.INFO 'Texto de marca de agua
Jpeg.Save BlogPath & /upload/ & FileName ' Guardar archivo
Establecer Jpeg = Nada
2. Crea miniaturas para imágenes.
JPEG tenue
Establecer Jpeg = Server.CreateObject(Persits.Jpeg) 'Crear objeto
Jpeg.Open BlogPath & /upload/ & FileName ' La ubicación de la imagen
Jpeg.Ancho = Jpeg.AnchoOriginal / 2
Jpeg.Altura = Jpeg.AlturaOriginal / 2
'Establezca el tamaño de la miniatura (aquí la proporción se establece en 50%), también puede darle un valor preciso, como Jpeg.Width=120
Jpeg.Save BlogPath & /upload/ & FileName ' Guardar archivo
Establecer Jpeg = Nada