Notifikationer

Markér alle som læst Log ud

azez Nybegynder

20. august 2003 - 18:29 Der er 14 kommentarer og
1 løsning

AspUpload. Filen skal omdøbes, og resize's.

Jeg bruger aspupload

Jeg skal kunne oploade en fil som jeg så omdøber og resizer... hvordan gør jeg de to sidste ting ?

har flg. kode :

Set Upload = Server.CreateObject("Persits.Upload.1")
Count = Upload.Savevirtual("grafik/butikstilbud/")

.....

filens nye navn skal være session("navn") og størrelsen 75 x 75. og kun jpg billeder...

på forhånd tak

Synes godt om

azez Nybegynder

20. august 2003 - 18:59 #1

kom nu.....

Synes godt om

azez Nybegynder

20. august 2003 - 19:07 #2

hmm ?... svært ?.. det synes jeg også...

Synes godt om

eagleeye Praktikant

20. august 2003 - 19:09 #3

Tilmodighed .....

Her er et eks:

<HTML>
<BODY>
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
' Use AspJpeg to resize image
Set Jpeg = Server.CreateObject("Persits.Jpeg")

' Capture and save uploaded image to the same directory as script
Upload.Savevirtual("grafik/butikstilbud/")

For Each File in Upload.Files

If File.ImageType <> "JPG" Then
File.Delete
Else
Jpeg.Open File.Path

Jpeg.Width = 75
Jpeg.Height = 75

Jpeg.Save Server.MapPath("grafik/butikstilbud/" & session("navn"))
File.Delete
End If

Next
%>
</BODY>
</HTML>

Synes godt om

azez Nybegynder

20. august 2003 - 19:21 #4

får en fejl som hedder :

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/i-butikker.dk/ButikLoginTilbudUpload.asp, line 6

Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: http://www.microsoft.com/contentredirect.asp.

Synes godt om

azez Nybegynder

20. august 2003 - 19:23 #5

sikkert fordi jeg har aspimage som billede komponent på serveren... sorry

Synes godt om

eagleeye Praktikant

20. august 2003 - 19:35 #6

Ok, så må du prøve med denne:

<HTML>
<BODY>
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
' Capture and save uploaded image to the same directory as script
Upload.Savevirtual("grafik/butikstilbud/")

For Each File in Upload.Files

If File.ImageType <> "JPG" Then
File.Delete
Else

Image = Server.CreateObject("AspImage.Image")
strFileName = "grafik/butikstilbud/" & File.ExtractFileName
Image.LoadImage (Server.MapPath("" & strFileName & ""))
Image.FileName = Server.MapPath("grafik/butikstilbud/" & session("navn"))

Image.ImageFormat = 1
Image.JPEGQuality = 90

newheight = 75
newwidth = 75

IMAGE.RESIZE (newwidth,newheight)

IMAGE.SaveImage
File.Delete
End If

Next
%>
</BODY>
</HTML>

Synes godt om

azez Nybegynder

20. august 2003 - 19:37 #7

Microsoft VBScript compilation error '800a0414'

Cannot use parentheses when calling a Sub

/i-butikker.dk/ButikLoginTilbudUpload.asp, line 25

IMAGE.RESIZE (newwidth,newheight)
---------------------------------^

Synes godt om

eagleeye Praktikant

20. august 2003 - 19:40 #8

Så prøv at skrive:

IMAGE.RESIZE newwidth,newheight

Synes godt om

azez Nybegynder

20. august 2003 - 19:43 #9

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/i-butikker.dk/ButikLoginTilbudUpload.asp, line 14

Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at:http://www.microsoft.com/contentredirect.asp.

men jepponet.dk, som er vores udbyder, skriver at de har aspimage... ?!?

Synes godt om

eagleeye Praktikant

20. august 2003 - 19:47 #10

JEg har glemt et Set foran line 14 så det bliver sådan her:

Set Image = Server.CreateObject("AspImage.Image")

Synes godt om

eagleeye Praktikant

20. august 2003 - 19:47 #11

Måske derfor fejlen kommer??

Synes godt om

azez Nybegynder

20. august 2003 - 19:49 #12

samme fejl som før....

Synes godt om

eagleeye Praktikant

20. august 2003 - 19:53 #13

hmm underligt.
Jeg kender ikke til jepponet.dk men ja de skriver godt nok de har ASPimage.
Det er ikke noget man skal vælge specielt??
Eller må du droppe dem en mail og spørge for det skulle være den rigtige ProgID.

Synes godt om

azez Nybegynder

20. august 2003 - 19:54 #14

vi skulle have det... snakker med dem first thing in the morning... og vender så tilbage...

indtil videre tak...:-)

Synes godt om

azez Nybegynder

25. august 2003 - 16:30 #15

det var en fejl fra deres side... tak....

kan du hjælpe mig med 2 "små" ting ? du får selvfølgelig extra point ?

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS