---

Jeg skal have lavet et system til upload af billeder til min side
således at man kan uploade sit profil billede bl.a.

(vil lige pointere at dette er første gang jeg roder med upload i
asp)

Mit script er lavet i functions og det vil altså bare ik virke.

Her er mit script:

----------------------------------------------------------------

Function uploadit()

Set Upload = Server.CreateObject("Persits.Upload.1")

   Upload.OverwriteFiles = True
   On Error Resume Next

   Upload.SetMaxSize 1048576
   Count = Upload.Save("" & server.mappath & "/" &
request.querystring("folder") & "")
   
   If Err <> 0 Then

   HTMLstr = HTMLstr & "<FONT SIZE='1' FACE='verdana'
COLOR='#0020A0'>The following error occured while
uploading:</FONT><br>"
   HTMLstr = HTMLstr & "<FONT SIZE='1' FACE='verdana'
COLOR='#FF2020'>" & Err.Description & "</FONT><br>"

Else
   HTMLstr = HTMLstr & "<FONT SIZE='1' FACE='verdana'
COLOR='#0020A0'>"
   HTMLstr = HTMLstr & "Success! Count file(s) have been uploaded."
   HTMLstr = HTMLstr & "</FONT>"

   HTMLstr = HTMLstr & "<FONT SIZE='1' FACE='verdana'
COLOR='#0020A0'>"
   HTMLstr = HTMLstr & "<TH BGCOLOR='#FFFF00'>Uploaded File</TH><TH
BGCOLOR='#FFFF00'>Size</TH><TH BGCOLOR='#FFFF00'>Original
Size</TH><TR>"
   For Each File in Upload.Files
      If File.ImageType = "GIF" or File.ImageType = "JPG" or
File.ImageType = "PNG" Then
         HTMLstr = HTMLstr & "<TD ALIGN='CENTER'>"
         HTMLstr = HTMLstr & "<IMG SRC='" &
request.querystring("folder") & "/" & File.FileName & "'
width='405'><BR><B>" & File.OriginalPath & "</B><BR>"
         HTMLstr = HTMLstr & "(" & File.ImageWidth & " x " &
File.ImageHeight & " pixels)"
         HTMLstr = HTMLstr & "</TD>"
      Else
         HTMLstr = HTMLstr & "<TD><B>" & File.OriginalPath &
"</B></TD>"
      End If
      HTMLstr = HTMLstr & "<TD ALIGN='RIGHT' VALIGN='TOP'>" &
File.Size & " bytes</TD>"
      HTMLstr = HTMLstr & "<TD ALIGN='RIGHT' VALIGN='TOP'>" &
File.OriginalSize & " bytes</TD><TR>"
   Next
   
   End If
   
   uploadit = HTMLstr

End Function

----------------------------------------------------------------

Den er så sød at komme med fejlen:

The following error occured while uploading:
Wrong number of arguments or invalid property assignment


Er der nogen af jer der kan fortælle mig hvorfor den kommer med
den fejl og muligvis hjælpe mig med at få det til at virke?

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Kasper Klattrup skrev:

> Den er så sød at komme med fejlen:
>
> The following error occured while uploading:
> Wrong number of arguments or invalid property assignment

Start med at udkommentere fejlhåndteringen (On Error Resume Next) - så
er det langt lettere at se hvad der går galt.

--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

> Start med at udkommentere fejlhåndteringen (On Error Resume Next) - så
> er det langt lettere at se hvad der går galt.

Jeg har nu udkommenteret fejlhåndteringen og så melder den ud med fejlen:

>Persits.Upload.1 error '800a0005'

>The system cannot find the file specified.


--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Kasper Klattrup skrev:

> Jeg har nu udkommenteret fejlhåndteringen og så melder den ud med fejlen:

> Persits.Upload.1 error '800a0005'
> The system cannot find the file specified.

Giver den ikke noget linjenummer?

Det er dog formentlig denne linje der driller:

   Count = Upload.Save("" & server.mappath & "/" &
   request.querystring("folder") & "")

Jeg kender ikke Persits-komponenten, men du har flere ubekendte i kaldet
til save-metoden. Jeg tror ikke du skal bruge server.mappath uden
parametre, men start under alle omstændigheder med at skrive argumentet
til Save ud:

   Dim place
   place = server.mappath & "/" & request.Querystring("folder")

   ' Udkommenter de to følgende linjer når du har undersøgt place
   Response.write place
   Reponse.End

   Count = Upload.Save(place)


Prøv samtidig at kigge på hvad Save-parameteren forventer som argument.

--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

Jens GyldenkærneClausen wrote in dk.edb.internet.webdesign.serverside.asp:
> Kasper Klattrup skrev:
>
> > Jeg har nu udkommenteret fejlhåndteringen og så melder den ud med fejlen:
>
> > Persits.Upload.1 error '800a0005'
> > The system cannot find the file specified.
>
> Giver den ikke noget linjenummer?

Jo den giver linie nr. 1747 eller noget i den retning.

>
> Det er dog formentlig denne linje der driller:
>
>    Count = Upload.Save("" & server.mappath & "/" &
>    request.querystring("folder") & "")
>

Ja det passer med at det er den linie der driller men den fejl så jeg næsten
lige efter jeg havde postet den første post og fik rettet det så det virker
som det skal. Dog siger den stadig at den ikke kan finde filen. Det må vel på
en eller anden måde betyde at den ikke får informationen fra formen?

Hvis du skulle være interesseret i lige at tage et kig på den function formen
er i paster jeg den lige her:

>Function uploadform()
>
>HTMLstr = HTMLstr & "<table width='405' border='0' cellpadding='0'
>cellspacing='0'>"
>HTMLstr = HTMLstr & "<tr><td width='405'>"
>HTMLstr = HTMLstr & "<FORM METHOD='post' ENCTYPE='multipart/form-data'
>ACTION='default.asp?page=Uploadit&folder=" & request.querystring("folder") >&
"&prev=" & request.querystring("prev") & "&process=" &
request.querystring("process") & "'>"
>HTMLstr = HTMLstr & "<INPUT TYPE='FILE' SIZE=40 NAME='FILE'><BR>"
>HTMLstr = HTMLstr & "<INPUT TYPE='SUBMIT' VALUE='Upload'>"
>HTMLstr = HTMLstr & "</FORM>"
>HTMLstr = HTMLstr & "</td></tr>"
>HTMLstr = HTMLstr & "</table>"
>   
>uploadform = HTMLstr
>   
>End Function

Jeg kan ikke selv få øje på noget fejl (den nye kode til selve upload sys er i
1 anden post jeg næsten lige har posted).

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Kasper Klattrup skrev:

> Dog siger den stadig at den ikke kan finde filen. Det må vel på
> en eller anden måde betyde at den ikke får informationen fra formen?

Du ved stadig ikke hvilken fil asp-parseren prøver at få fat i. Lav den
response.write-linje jeg viste i sidste indlæg, så du kan se hvad dine
variable indeholder.

--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

> Du ved stadig ikke hvilken fil asp-parseren prøver at få fat i. Lav den
> response.write-linje jeg viste i sidste indlæg, så du kan se hvad dine
> variable indeholder.

Jeg har prøvet at lave den og får resultatet:


c:\webs\talkactive\web27009\thorned.dk\consider\newspics

det hele passer nøjagtigt som det skal :)

Den vil bare ik uploade filerne :S


>Persits.Upload.1 error '800a0005'

>The system cannot find the file specified.

>/consider/code.asp, line 1746

Ovenstående er den fejl den melder ud til mig...



--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Kasper Klattrup skrev:

> c:\webs\talkactive\web27009\thorned.dk\consider\newspics

Er det en mappe eller en fil? Og eksisterer den i forvejen?

Hvis det er en mappe, har du så prøvet at sætte "\" på strengen?

Har du tjekket med eksempler på fungerende upload-sider med
Persits-komponenten (som regel kan man finde eksempler i manualen eller
på firmaets hjemmeside).

--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

> > c:\webs\talkactive\web27009\thorned.dk\consider\newspics
>
> Er det en mappe eller en fil? Og eksisterer den i forvejen?
>
> Hvis det er en mappe, har du så prøvet at sætte "\" på strengen?
>

Det er en mappe og den eksisterer og jeg har prøvet at sætte en \ på
strengen.

> Har du tjekket med eksempler på fungerende upload-sider med
> Persits-komponenten (som regel kan man finde eksempler i manualen eller
> på firmaets hjemmeside).
>

Jeg har dette script fra AspUpload's hjemmeside og mit windows webhotel
fra web10 kører med AspUpload så det skulle virke med den komponent.

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Kasper Klattrup skrev:

> Jeg har dette script fra AspUpload's hjemmeside og mit windows webhotel
> fra web10 kører med AspUpload så det skulle virke med den komponent.

Hov, jeg kom lige i tanke om noget. Har du husket at sætte
enctype="multipart/form-data" på formen? Ellers virker filupload ikke.
Din form-kode skal altså se ud som her:

<form action="upload.asp" enctype="multipart/form-data">

--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

> <form action="upload.asp" enctype="multipart/form-data">

Den linie har været i formlen hele tiden...

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Kasper Klatrup skrev:
>Persits.Upload.1 error '800a0005'

>The system cannot find the file specified.
> c:\webs\talkactive\web27009\thorned.dk\consider\newspics

>det hele passer nøjagtigt som det skal :)

Hvem har skrive rettighed til den mappe?

--
Med Venlig Hilsen
Jørgen Müller
"Kasper Klattrup" <zap_uplink@hotmail.com> wrote in message
news:420cc359$0$29277$14726298@news.sunsite.dk...
> > <form action="upload.asp" enctype="multipart/form-data">
>
> Den linie har været i formlen hele tiden...
>
> --
> Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
> - Pædagogiske tutorials på dansk
> - Kom godt i gang med koderne
> KLIK HER! => http://www.html.dk/tutorials

---

>
> Hvem har skrive rettighed til den mappe?
>

Det er jo det :S

Fandt fejlen for et par timer siden :P

Problemet var at jeg kun har skriverettighed til den mappe der
hedder upload i roden :P

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Koden er blevet ændret lidt men den kommer stadig med følgende fejl:

>Persits.Upload.1 error '800a0005'

>The system cannot find the file specified.

Koden er nu:

>---------------------------------------------------------------

>Set Upload = Server.CreateObject("Persits.Upload.1")

>Upload.OverwriteFiles = True

>Upload.SetMaxSize 1048576
>Count = Upload.Save("" & Server.MapPath("" &
request.querystring("folder") & "") & "/")

>---------------------------------------------------------------

Resten af koden er uden betydning da det bare er en
response.redirect så man altid ender på den side men var på da man
trykke ind for at uploade et billede... (det skal også lige siges at
dette står i en function men det burde vel ikke have noget
betydning?)

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials