Ce que je vous dis aujourd'hui, c'est la connaissance de l'ASP pour ajouter des filigranes à l'image .. mon ASP apprend très mal.
ASP pour ajouter des filigranes à l'image nécessite des composants ... ASPJPEG couramment utilisé et le wsimage développé chinois ... le premier est gratuit pendant 30 jours ... le second est complètement gratuit ... bien sûr, nous devons utiliser les produits des produits Le peuple chinois.
Le composant peut télécharger http://aknife.ys168.com (télécharger la version 3.0) sur http://aknife.ys168.com
Méthode d'enregistrement des composants:
Entrez "Regsvr32 [Path DLL]" Sous l'invite de commande
L'ajout de filigranes à l'image n'est rien de plus que d'obtenir la taille de l'image, puis d'écrire le code de filigrane.
Un: Obtenez la taille de l'image (ici est représentée par les valeurs de pixels. Les amis qui apprennent Photoshop doivent comprendre)
| Ce qui suit est le fragment de code: <% set obj = server.createObject ("wsimage.resize") '' -Call composant obj.loadsoucepic server.mappath ("25.jpg") '' '' "Ouvrez l'image, le nom de l'image est 25.jpg obj.getsourceinfo iwidth, iheight Response.Write "Largeur d'image:" & Iwidth & "<br>" "" Obtenez la largeur de l'image Response.Write "Hauteur de l'image:" & ipight & "<br>" "" Obtenez la hauteur de l'image Strorror = obj.errorinfo Si Strerror <> "" alors réponse.Write obj.errorinfo terminer si obj. Définir OBJ = rien %> '' ------------------------------------------------ --------------------------------------------- ----- ------------ Deux: ajouter du filigrane de texte <% set obj = server.createObject ("wsimage.resize") obj.loadsoucepic server.mappath ("25.jpg") '' obj.quality = 75 obj.txtmarkfont = "Chinese Color Cloud" 'Set Watermark Text Font obj.txtmarkbond = false '' Réglez l'épaisseur du texte de filigrane obj.markrotate = 0 '' 'Angle rotatif du texte de filigrane obj.txtmarkheigh = 25 '' 'hauteur de texte hydaline obj.addtxtmark server.mappath ("txtmark.jpg"), "Éloignez-vous du pays", & h00ff00 &, 10, 70 STRERROR = obj.errorinfo '' Pour générer le nom des images, la couleur du texte est un filigrane à l'emplacement de l'image Si Strerror <> "" alors réponse.Write obj.errorinfo terminer si obj. Définir OBJ = rien %> '' ------------------------------------------------ --------------------------------------------- ----- ------------ Trois: Ajouter des images <% 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, et hffffffff, 70 STRERROR = obj.errorinfo '' Pour générer le nom des images, la couleur du texte est un filigrane à l'emplacement de l'image Si Strerror <> "" alors réponse.Write obj.errorinfo terminer si obj. Définir OBJ = rien %> '' ------------------------------------------------ --------------------------------------------- ----- ------------ En fait, l'ajout de filigranes à l'image est aussi simple que. Coupez l'image et générez la vignette de l'image. Je dois encore m'y habituer, utiliser du code pour ajouter des injects pour expliquer: Coupez l'image: <% set obj = server.createObject ("wsimage.resize") obj.loadsoucepic server.mappath ("25.jpg") obj.quality = 75 Obj.cropimage server.mappath ("" 25_crop.jpg "), 100,10,200,200 '' Définir la coupe et la génération de noms d'images Strorror = obj.errorinfo Si Strerror <> "" alors réponse.Write obj.errorinfo terminer si obj. Définir OBJ = rien %> Remarque détaillée: La méthode de Cutimage de WSIMAGE est utilisée pour réduire l'image. L'image et les 10 premiers pixels en haut. '' ------------------------------------------------ --------------------------------------------- ----- ------------ Générer des photos d'images: <% set obj = server.createObject ("wsimage.resize") obj.loadsoucepic server.mappath ("25.jpg") '' obj.quality = 75 obj.outputspic server.mappath ("" 25_s.jpg "), 0,5,0.5,3 '' '' Le nom du diagramme de définition est la taille de la taille Strorror = obj.errorinfo Si Strerror <> "" alors réponse.Write obj.errorinfo terminer si obj. Définir OBJ = rien %> |
Il existe quatre méthodes d'exportation:
(1) obj.outputspic server.mappath ("25_s.jpg"), 200,150,0
200 est la largeur de sortie, 150 est la sortie élevée.
(2) obj.outputapic server.mappath ("25_s.jpg"), 200,0,1
Avec 200 largeur de sortie, la sortie élevée sera mise à l'échelle avec la colonne.