der burde uploade når jeg i min form har følgende kode
<INPUT TYPE=FILE SIZE=18 NAME="FILE1">
i min form er nogle formfelter og alle virker og bliver lagret, men upload feltet bliver ikke udført, selvom det virker som om at der bliver uploadet noget sker det ikke.
Husker du at bruge <form enctype="multipart/form-data" action="......." method=post> i din form, og du kan kun uploade til upload mappen. Så din /brugere/... kunne måske også være fejlen.
du har kun skriverettighed fra asp til at skrive i mappen upload og evt undermapper, så hvis du har lavet en mappe brugere i roden, virker det højst sandsynligt ikke. Der er umiddelbart ikke fejl i koden, men hvis du fjerner On Error Resume Next så vil asp fortælle dig hvad der er galt, hvis der er noget galt, og det kunne det jo tyde på, siden du ikke får uploadet nogen fil.
ok, det er min fejl, du kan godt uploade til mappen billeder. Men hvis du har fjernet linien On Error Resume Next så burde ingen fejl betyde at filen er uploadet. Du kan evt prøve med følgende script, så fortæller den dig, om det er gået godt eller skidt: <% Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False On Error Resume Next
Hvis jeg har en side der hedder upload.asp med følgende kode <FORM NAME="MyForm" METHOD="POST" ENCTYPE="multipart/form-data" ACTION="upload1.asp"> <INPUT TYPE=FILE SIZE=40 NAME="FILE1"><BR> <INPUT TYPE=submit VALUE="Upload" name="B1"> </FORM>
Og en der hedder upload1.asp med følgende kode
<% Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False On Error Resume Next
Det er svært at sige, men hvis du poster dit script, kan kan jeg se på det. Men følgende virker ved mig: <html> <body> <%if request.QueryString("action")<>"upload" Then %> <FORM NAME="MyForm" METHOD="POST" ENCTYPE="multipart/form-data" ACTION="<%=Request.ServerVariables("SCRIPT_NAME") %>?action=upload"> <INPUT TYPE=FILE SIZE=40 NAME="FILE1"><BR> <INPUT TYPE=submit VALUE="Upload" name="B1"> </FORM> <% Else Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False On Error Resume Next
Upload.SetMaxSize 1048576 ' Limit files to 1MB Count = Upload.Save(Server.MapPath("./upload"))
If Err <> 0 Then %>
<FONT SIZE=3 FACE="Arial" COLOR=#0020A0> <H3>Der er gået kage i det:</h3> </FONT>
<FONT SIZE=3 FACE="Arial" COLOR=#FF2020> <h2>"<% = Err.Description %>"</h2> </FONT> <% Else%> <FONT SIZE=3 FACE="Arial" COLOR=#FF2020> <h2>Jeg tror det er gået godt</h2> </FONT> <%End If %> <%End if %> </body> </html>
Jeg har sendt den. Men problemet i det der virker hos dig er at jeg ikke rigtig kan få det ind sammen med mit nuværende script. Undre mig bare det ikke virker på en side når det gør på 2.
takker, kan du se hvad der er galt med mit seneste spørgsmål...
Synes godt om
Ny brugerNybegynder
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.