Avatar billede mitbrugernavn Praktikant
08. marts 2006 - 13:41 Der er 8 kommentarer og
3 løsninger

aspimage sort hvid billed

Hvordan opretter jeg et sort hvid billed ud fra et farve med Aspimage. Er der nogen der har et script ???
Avatar billede kisbye Nybegynder
08. marts 2006 - 16:02 #1
Det er simpelt, det gør du simpelthen ved

Call Image.CreateGrayScale

Hvor image er dit ASPimage objektet
Avatar billede kisbye Nybegynder
08. marts 2006 - 16:06 #2
Lige et eksempel:

<%
Response.ContentType = "image/jpeg"

const Str_billede = "film_start.jpg" 'her billedet der skal konveteres til grayscale

Set Image = Server.CreateObject("AspImage.Image")
Image.LoadImage server.MapPath("../images/") & "/" & Str_billede
Image.ImageFormat = 1
Image.JPEGQuality = 100
Call Image.CreateGrayScale
Response.BinaryWrite Image.Image
Set Image = Nothing
%>
Avatar billede mitbrugernavn Praktikant
08. marts 2006 - 16:12 #3
takker mennnn

har sat følgende ind

Response.ContentType = "image/jpeg"

const Str_billede = "asel.jpg" 'her billedet der skal konveteres til grayscale

Set Image = Server.CreateObject("AspImage.Image")
Image.LoadImage server.MapPath("Map/") & "/" & Str_billede
Image.ImageFormat = 1
Image.JPEGQuality = 100
Call Image.CreateGrayScale
Response.BinaryWrite Image.Image
Set Image = Nothing

så forventer jeg at der kommer et billed frem - men får denne fejl

Fejltype:
Response-objekt, ASP 0106 (0x80020005)
En datatype, der ikke kunne håndteres, blev fundet.
/test/iaspimage.asp, line 18

linie 18 er "Response.BinaryWrite Image.Image
"


???
Avatar billede kisbye Nybegynder
08. marts 2006 - 16:15 #4
hovsa, det var vel meningen at jeg skal gå udfra at billedet ligger i samme mappe som scriptet?

<%
Response.ContentType = "image/jpeg"

const Str_billede = "film_start.jpg" 'her billedet der skal konveteres til grayscale

Set Image = Server.CreateObject("AspImage.Image")
Image.LoadImage server.MapPath(Str_billede)
Image.ImageFormat = 1
Image.JPEGQuality = 100
Call Image.CreateGrayScale
Response.BinaryWrite Image.Image
Set Image = Nothing
%>

Skal også lige nævne at det er bygget til at virke med Jpeg billeder.
Avatar billede kisbye Nybegynder
08. marts 2006 - 16:20 #5
Der er jo slet ikke 18 linier?

Du skal smide det hele i en fil for sig, f.eks. picture.asp

og der hvor du vil have billedet ud smider du scriptet i img tagget f.eks.
<img src="picture.asp">

så kan senere omskrive scriptet så du dynamisk kan vælge hvilke billeder du vil benytte med hjælp at querystings

f.eks.
<img src="picture.asp?image=asel.jpg">

og så udskrifte følgende i filen

Image.LoadImage server.MapPath(request.querystring("image"))
Avatar billede mitbrugernavn Praktikant
08. marts 2006 - 16:23 #6
øøøøøøøhhhhh

kan vi ikke lige tage den forfra hvad jeg skal gøre ???
Avatar billede kisbye Nybegynder
08. marts 2006 - 16:30 #7
Opret en fil der hedder picture.asp.
Opret den i samme mappe som billedet, for nemhedens skyld, du kan altid lave om på det senere.
filen skal indeholde følgende:

<%
Response.ContentType = "image/jpeg"
Set Image = Server.CreateObject("AspImage.Image")
Image.LoadImage server.MapPath(request.QueryString("image"))
Image.ImageFormat = 1
Image.JPEGQuality = 100
Call Image.CreateGrayScale
Response.BinaryWrite Image.Image
Set Image = Nothing
%>
Bemærk at filen KUN skal indeholde ovenstående, ikke noget med html/body, ect.

i den fil hvor du vil benytte billedet som ligger i samme mappe som picture.asp, skriver du følgende:

<img src="picture.asp?image=asel.jpg">

pointen er at picture.asp udskrives som et billede, hvis det virker.
Avatar billede mitbrugernavn Praktikant
08. marts 2006 - 16:32 #8
stoppppp - har fået det til at virke - skulle bare have tankerne til at kører forad og ikke gå helt i stå.

lavet det som følgende - (for andres skyld)

en fil der hedder pictur.asp med følgende <%
Response.ContentType = "image/jpeg"

const Str_billede = "asel.jpg" 'her billedet der skal konveteres til grayscale

Set Image = Server.CreateObject("AspImage.Image")
'Image.LoadImage server.MapPath(Str_billede)
Image.LoadImage server.MapPath(request.querystring("image"))
Image.ImageFormat = 1
Image.JPEGQuality = 100
Call Image.CreateGrayScale
Response.BinaryWrite Image.Image
Set Image = Nothing

%>



og derefter en test.asp

med følgende:

<img src="picture.asp?image=asel.jpg">


takker for hjælpen - læg et svar så får du point
Avatar billede mitbrugernavn Praktikant
08. marts 2006 - 16:34 #9
;-)) du har fået point nu

og ;-))))  ja så er der da 2 gange hjælp at hente for andre dit og det jeg fik brygget sammen.

tak for hjælpen
Avatar billede kisbye Nybegynder
08. marts 2006 - 16:36 #10
Man kan lave alt muligt andet sjov med aspimage.
Jeg bruger det primært til at lave thumbnails af mine billeder, men kan også f.eks. bruge det til at smide vandmærke på sine billeder.

Du kan læse hele dokumentationen her http://www.123hotel.dk/service/kompletdokumentation/aspimage.htm
Avatar billede mitbrugernavn Praktikant
08. marts 2006 - 16:39 #11
har læst og læst - men syntes at jeg mangler nogle eksempler, har været på alverdens sider for at finde noget der bare lignede - men heldigvis har vi her i lille danmark jo eksperten.dk ;-)))

AspImage er lidt drøj at komme igang med - men sjovt er det.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester



IT-JOB

HusCompagniet A/S

Application Manager

Politiets Efterretningstjeneste

Ambitiøs Enterprisearkitekt til PET

Udviklings- og Forenklingsstyrelsen

Generalist til PMO

Netcompany A/S

Test Specialist