ASP Upload fra Mac

kommer den slet ikke med en fejl?

Nej - ikke det der ligner, men man kan se at den ikke har uploadet billederne ved at skærmbilledet skifter meget hurtigt, hvilket den ikke bør gøre, da billederne fylder ca. 100 kb pr. styk.

Hvad er det for en version af ASP Upload?
Hvor mange billeder uploader du af gangen?
Hvilken server ligger det på?
Bruger du et komponent sammen med asp upload, som fx XUpload?

Jeg ved ikke lige hvad det er for en version af ASP-Upload.

Der er mulighed for 25 billeder ad gangen, hvilket kører fint fra PC, men der er problemer selv ved både 1 og 2 billeder.

Det ligger hos Gullestrup.net.

Nej - jeg bruger ikke andre komponenter sammen med ASP-upload.

Prøv at spør supporten hvilken version de køre af AspUpload, ellers prøv med AspSmartUpload. Hvis den samme fejl kommer når du bruger AspSmartUpload, er det højst sansynlig en server fejl.

Ellers prøv at poste din kode her, så kan jeg lige se om det er scriptet at der er fejl i.

Det burde jo ikke være scriptet der er fejl i når det kører uden problemer når man uploader fra PC. Iøvrigt har jeg også brugt koden på andre sites, but here goes:

Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverWriteFiles = False
Upload.Save Server.MapPath("./../images/galleri") & "\"

point = upload.form("m")
grp = upload.form("grp")
navn = upload.form("navn")
besk = replace(replace(upload.form("besk"),"'","´"),"""","´´") 'erstatter farlige tegn

Set pic1 = Upload.Files("pic1")
    if pic1 is nothing then
        pic1a = ""
    else
        pic1a = pic1.ExtractFileName
    end if
   
Set pic2 = Upload.Files("pic2")
    if pic2 is nothing then
        pic2a = ""
    else
        pic2a = pic2.ExtractFileName
    end if
   
Set pic3 = Upload.Files("pic3")
    if pic3 is nothing then
        pic3a = ""
    else
        pic3a = pic3.ExtractFileName
    end if
   
Set pic4 = Upload.Files("pic4")
    if pic4 is nothing then
        pic4a = ""
    else
        pic4a = pic4.ExtractFileName
    end if
   
Set pic5 = Upload.Files("pic5")
    if pic5 is nothing then
        pic5a = ""
    else
        pic5a = pic5.ExtractFileName
    end if
   
Set pic6 = Upload.Files("pic6")
    if pic6 is nothing then
        pic6a = ""
    else
        pic6a = pic6.ExtractFileName
    end if
   
Set pic7 = Upload.Files("pic7")
    if pic7 is nothing then
        pic7a = ""
    else
        pic7a = pic7.ExtractFileName
    end if
   
Set pic8 = Upload.Files("pic8")
    if pic8 is nothing then
        pic8a = ""
    else
        pic8a = pic8.ExtractFileName
    end if
   
Set pic9 = Upload.Files("pic9")
    if pic9 is nothing then
        pic9a = ""
    else
        pic9a = pic9.ExtractFileName
    end if
   
Set pic10 = Upload.Files("pic10")
    if pic10 is nothing then
        pic10a = ""
    else
        pic10a = pic10.ExtractFileName
    end if
   
Set pic11 = Upload.Files("pic11")
    if pic11 is nothing then
        pic11a = ""
    else
        pic11a = pic11.ExtractFileName
    end if
   
Set pic12 = Upload.Files("pic12")
    if pic12 is nothing then
        pic12a = ""
    else
        pic12a = pic12.ExtractFileName
    end if
   
Set pic13 = Upload.Files("pic13")
    if pic13 is nothing then
        pic13a = ""
    else
        pic13a = pic13.ExtractFileName
    end if
   
Set pic14 = Upload.Files("pic14")
    if pic14 is nothing then
        pic14a = ""
    else
        pic14a = pic14.ExtractFileName
    end if
   
Set pic15 = Upload.Files("pic15")
    if pic15 is nothing then
        pic15a = ""
    else
        pic15a = pic15.ExtractFileName
    end if
   
Set pic16 = Upload.Files("pic16")
    if pic16 is nothing then
        pic16a = ""
    else
        pic16a = pic16.ExtractFileName
    end if
   
Set pic17 = Upload.Files("pic17")
    if pic17 is nothing then
        pic17a = ""
    else
        pic17a = pic17.ExtractFileName
    end if
   
Set pic18 = Upload.Files("pic18")
    if pic18 is nothing then
        pic18a = ""
    else
        pic18a = pic18.ExtractFileName
    end if
   
Set pic19 = Upload.Files("pic19")
    if pic19 is nothing then
        pic19a = ""
    else
        pic19a = pic19.ExtractFileName
    end if
   
Set pic20 = Upload.Files("pic20")
    if pic20 is nothing then
        pic20a = ""
    else
        pic20a = pic20.ExtractFileName
    end if
   
Set pic21 = Upload.Files("pic21")
    if pic21 is nothing then
        pic21a = ""
    else
        pic21a = pic21.ExtractFileName
    end if
   
Set pic22 = Upload.Files("pic22")
    if pic22 is nothing then
        pic22a = ""
    else
        pic22a = pic22.ExtractFileName
    end if
   
Set pic23 = Upload.Files("pic23")
    if pic23 is nothing then
        pic23a = ""
    else
        pic23a = pic23.ExtractFileName
    end if
   
Set pic24 = Upload.Files("pic24")
    if pic24 is nothing then
        pic24a = ""
    else
        pic24a = pic24.ExtractFileName
    end if
   
Set pic25 = Upload.Files("pic25")
    if pic25 is nothing then
        pic25a = ""
    else
        pic25a = pic25.ExtractFileName
    end if

sql = "INSERT INTO Galleri (Gruppe,Fotograf,Beskrivelse,Pic1,Pic2,Pic3,Pic4,Pic5,Pic6,Pic7,Pic8,Pic9,Pic10,Pic11,Pic12,Pic13,Pic14,Pic15,Pic16,Pic17,Pic18,Pic19,Pic20,Pic21,Pic22,Pic23,Pic24,Pic25,CD) VALUES ("&"'"&grp&"','"&navn&"','"&besk&"','"&pic1a&"','"&pic2a&"','"&pic3a&"','"&pic4a&"','"&pic5a&"','"&pic6a&"','"&pic7a&"','"&pic8a&"','"&pic9a&"','"&pic10a&"','"&pic11a&"','"&pic12a&"','"&pic13a&"','"&pic14a&"','"&pic15a&"','"&pic16a&"','"&pic17a&"','"&pic18a&"','"&pic19a&"','"&pic20a&"','"&pic21a&"','"&pic22a&"','"&pic23a&"','"&pic24a&"','"&pic25a&"','"&Date()&"')"
Conn.Execute(sql)

response.redirect("galleri.asp?m="&point&"")

Det er nok et vildt gæt, men prøv lige at lave dette her:
Set Upload = Server.CreateObject("Persits.Upload.1")

om til:
Set Upload = Server.CreateObject("Persits.Upload")

Hmmm - prøver lige imorgen, selv om det ikke er i henhold til dokumentationen.

Foreløbigt tak for hjælpen.

Har du fundet ud a noget, webbe?

Nej - ikke endnu.....arbejder stadig på det.

Melder tilbage lidt senere idag

Det virker i hvert fald på PC - har ikke lige haft mulighed for at tjekke det på Mac endnu.

Virker det?

Sorry - havde fuldstændig glemt det - det lader til at virke på Mac også nu.

Tak for hjælpen - pointene er dine ;0)

hehe... Det er helt i orden :-)
Det var så lidt, Svar :o)