Lidt hjælp med funktion (koden er så godt som skrevet)
Hej,Jeg arbejder med flere forskellige nye programmeringssprog for tiden og er derfor kørt helt fast i ASP da jeg ikke anvender det så meget mere..
Nu var jeg så lige ved at skrive en funktion createThumbnail(a, b)
' ##################################################
' Funktion der opretter et thumbnail.
' tager 2 argumenter.
' a = billedfilens navn
' b = filens sti
' ##################################################
Function createThumbnail(a, b)
filnavn = a
sti = b
'sti = "aspimage/"
Set Image = Server.CreateObject("AspImage.Image")
Image.LoadImage Server.Mappath(sti & filnavn)
ImageHeight = Image.MaxY
ImageWidth = Image.MaxX
'Udregn ny størrelse ud fra ønsket bredde på 150 pixels
fixedWidth = 150
NewHeight = Cint(ImageHeight*fixedWidth/ImageWidth)
NewWidth = fixedWidth
'Resize billedet til den nye størrelse
Image.Resize NewWidth,NewHeight
' definerer et nyt filnavn med "mini_" foran
Image.FileName = Server.Mappath(sti & "mini_" & filnavn)
Image.SaveImage
' releaser image objektet
Set Image = Nothing
End function
createThumbnail("billede.jpg", "aspimage/")
%>
Når jeg kalder createThumbnail med de 2 argumenter får jeg fejlen:
createThumbnail("billede.jpg", "aspimage/")
Er bange for at jeg er blevet lidt java-skadet mht. opbygning af funktioner og får blandet nogle ting sammen.
Er der en der kan hjælpe mig videre?
/pfp
