Avatar billede azez Nybegynder
27. august 2003 - 15:45 Der er 13 kommentarer og
1 løsning

Fejl i ASPUpload

jeg får en fejl som hedder :

Persits.Upload.1 error '800a0003'

Nothing has been posted.

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


Min kode er flg :
<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

Set Image = Server.CreateObject("AspImage.Image")
    strFileName = "grafik/butikstilbud/" & File.ExtractFileName
  Image.LoadImage (Server.MapPath("" & strFileName & ""))
  Image.FileName = Server.MapPath("grafik/butikstilbud/" & session("knr"))
  Image.ImageFormat = 1
  Image.JPEGQuality = 90
   
    ImageHeight = Image.MaxY
    ImageWidth = Image.MaxX
    size = 75
   
    If ImageHeight < ImageWidth Then
        NewHeight = Cint(ImageHeight*size/ImageWidth)
        NewWidth = size
    Else
        NewWidth = Cint(ImageWidth*size/ImageHeight)   
        NewHeight = size
    End If
   

    IMAGE.RESIZE newwidth,newheight

    IMAGE.SaveImage
    File.Delete
  End If

Next
response.redirect "?status=ButikLogin&Valg=Tilbud"
%>



</body>
</html>


Og den fil som poster dataen har flg. kode:
<FORM ACTION="ButikLoginTilbudUpload.asp" METHOD="POST" ENCTYPE="multipart/form-data">
<INPUT TYPE=FILE NAME="UploadFormName">
<div align="right"><input type="image" src="grafik/knapper/opret.gif"></div>
</FORM>


Hvad er galt ?
Avatar billede ellebaek Nybegynder
27. august 2003 - 15:51 #1
Skal feltet ikke hedde FILE1, der hvor du poster filen for at det virker..?
Avatar billede azez Nybegynder
27. august 2003 - 15:52 #2
jamen det sjove (i "") ved det hele er at den faktisk får oploadet filen. og får resized den osv... ?!?
Avatar billede ellebaek Nybegynder
27. august 2003 - 15:52 #3
Altså:
<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

Set Image = Server.CreateObject("AspImage.Image")
    strFileName = "grafik/butikstilbud/" & File.ExtractFileName
  Image.LoadImage (Server.MapPath("" & strFileName & ""))
  Image.FileName = Server.MapPath("grafik/butikstilbud/" & session("knr"))
  Image.ImageFormat = 1
  Image.JPEGQuality = 90
   
    ImageHeight = Image.MaxY
    ImageWidth = Image.MaxX
    size = 75
   
    If ImageHeight < ImageWidth Then
        NewHeight = Cint(ImageHeight*size/ImageWidth)
        NewWidth = size
    Else
        NewWidth = Cint(ImageWidth*size/ImageHeight)   
        NewHeight = size
    End If
   

    IMAGE.RESIZE newwidth,newheight

    IMAGE.SaveImage
    File.Delete
  End If

Next
response.redirect "?status=ButikLogin&Valg=Tilbud"
%>



</body>
</html>


Og den fil som poster dataen har flg. kode:
<FORM ACTION="ButikLoginTilbudUpload.asp" METHOD="POST" ENCTYPE="multipart/form-data">
<INPUT TYPE=FILE NAME="FILE1">
<div align="right"><input type="image" src="grafik/knapper/opret.gif"></div>
</FORM>
Avatar billede azez Nybegynder
27. august 2003 - 15:52 #4
men prøver
Avatar billede ellebaek Nybegynder
27. august 2003 - 15:53 #5
Avatar billede azez Nybegynder
27. august 2003 - 15:55 #6
det hjalp ikke... den siger nothing postet stadig
Avatar billede ellebaek Nybegynder
27. august 2003 - 15:57 #7
se linket...!
Avatar billede azez Nybegynder
27. august 2003 - 16:00 #8
kan jeg da ikk bruge ???
Avatar billede ellebaek Nybegynder
27. august 2003 - 16:02 #9
du kunne jo prøve den måde at uploade filer på, så bare droppe den del med databasen, og se om den stadig kommer med samme fejl...
Avatar billede azez Nybegynder
27. august 2003 - 16:34 #10
det virker, men det virker ikke på min kode...
Avatar billede azez Nybegynder
27. august 2003 - 16:44 #11
har nu flg. fejl...

det virker uanset hvad, men der kommer fejkode ved flg.
Set Upload = Server.CreateObject("Persits.Upload.1")
relativSti = "."

Upload.Save Server.MapPath(relativSti)

response.redirect "?status=ButikLogin"

og ikke ved flg.
Set Upload = Server.CreateObject("Persits.Upload.1")
relativSti = "."

Upload.Save Server.MapPath(relativSti)

Må man ikke redirecte ? eller
Avatar billede ellebaek Nybegynder
27. august 2003 - 16:46 #12
Det kan være du skal have navnet på din side på..

altså. fx.

response.redirect "default.asp?status=ButikLogin"
Avatar billede azez Nybegynder
27. august 2003 - 16:47 #13
det var sgu det... men ved du hvorfor ???
Avatar billede ellebaek Nybegynder
27. august 2003 - 16:50 #14
tror det har noget at gøre med at når du redirecter skal den finde en side at sende videre til, for ikke at komme med fejl.. Har selv haft samme problem, men havde ikke lige luret det i din kode til at starte med...!
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