webForumDet fria alternativet

AspSmartUpload BinaryRead

ASP

27 svar · 400 visningar · startad av M@rtin · sida 2 av 2

Frågan, av M@rtin

Det här är antagligen det vnaligaste och enklaste felet som finns i aspsmartupload men jag har aldrig använt det förut så jag vet inte vad som är fel. Får detta felmmeddelande: Det går inte att anropa BinaryRead efter att samlingen Request.Form har använts. Och på raden det är fel på står det: mySmartUpload.Upload Koden som har med komponenten att göra ser ut så här: Dim mySm

Läs frågan i sin helhet →
Medlem sedan dec. 19992 085 inlägg
#21

Nu börjar det närma sig :) Men inte riktigt:

<%
Dim myUpload
Dim intCount
set myUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
%>

<html>
   <body>

      <%
      found = false
      for i = 1 to myupload.form.count
      if ucase(myupload.form(i-1).name) = "HEJ" then
      found = true
      exit for
      end if
      next
      if not found then
      %>
         <form name="hej" action="supload2.asp" method="post">
            <input type="file" name="HEJ">
            <input type="submit" value="skicka">
         </form> 
      <%
      else
         if myupload.form("HEJ") <> "" then
         %>
            Uppladdat!
         <%
         else
         %>
            <form name="hej" action="supload2.asp" method="post">
               <input type="file" name="HEJ">
               <input type="submit" value="skicka">
            </form>
         <%
         end if
      end if
      %>

   </body>
</html>

Kommer till formuläret hela tiden även om jag väljer en fil :l

------------------
//M@rtin || Peachy.nu\\

ni taLar Bra laTiN

Medlem sedan dec. 19992 085 inlägg
#22

Fast nu kom jag på att det självklart blir så när jag inte kört myUpload.upload men om jag gör det så blir det ju som vanligt "Subscript out of range". Det måste vara .upload som måste göras på nåt annat sätt?

------------------
//M@rtin || Peachy.nu\\

ni taLar Bra laTiN

Medlem sedan dec. 19996 721 inlägg
#23

Ok, jag trodde det bara var exempelkod...

<%
Dim myUpload
Dim intCount
set myUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
myUpload.upload
%>
<html>
<body>
<%
if myUpload.Files.Count=0 then
%>
<form name="hej" action="supload2.asp" method="post" enctype="multipart/form-data"> 
<input type="file" name="HEJ">
<input type="submit" value="skicka">
</form> 
<%
else
'Gör något med den uppladdade filen
end if
set myUpload=Nothing
%>

</body>
</html>

------------------
/emission
If you see someone without a smiley, give them your colon.

Medlem sedan dec. 19992 085 inlägg
#24

Fortfarande Subscript out of range. Tror inte det har nåt med koden att göra :(

------------------
//M@rtin || Peachy.nu\\

ni taLar Bra laTiN

Medlem sedan dec. 19996 721 inlägg
#25

På vilken rad?

Medlem sedan dec. 19996 721 inlägg
#26

Ok, det är en dum bugg i aspSmartupload. Du kan inte köra upload etc. om du inte anropar sidan från ett multipart-formulär. Dela upp koden på flera sidor så ordnar det sig.

Medlem sedan dec. 19992 085 inlägg
#27

Okej. Ska prova.

Alltid den rad där .upload görs.

------------------
//M@rtin || Peachy.nu\\

ni taLar Bra laTiN

Medlem sedan dec. 19992 085 inlägg
#28

JAAAAAAAAA! Det fungerar nu :D Vet inte varför egentligen för separata filer trodde jag att jag provat. Men huvudsaken är att det fungerar :D

1000 tack alla som hjälpt till!

------------------
//M@rtin || Peachy.nu\\

ni taLar Bra laTiN

266 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
129 ms — deklarationer (db)
0 ms — hämta statistik (cache)
134 ms — hämta tråd, inlägg och bilagor (db)
128 ms — ändringar (db)