Avatar billede zantiago Nybegynder
30. april 2003 - 12:58 Der er 3 kommentarer og
1 løsning

Fejl i upload af billede

Hej Eksperter!

Jeg har fået fingre i et dejligt uploading-script til billeder. Det fungerer fint, men når jeg vil indsætte en ny form - eks. tekstfelt, melder den denne fejl:

------------------------------------------------
Billedet : Johnny.jpg (16708) blev uploaded.

Request object error 'ASP 0207 : 80004005'

Cannot use Request.Form

/vandscooter/billeder.asp, line 136

Cannot use Request.Form collection after calling BinaryRead.
-------------------------------------

Nedenstående er formularen og uploaddelen...

Formularen:
------------------->
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="billeder.asp?PictureAction=Uploaded">
Vælg et billede:<BR>
<INPUT TYPE=FILE NAME="FILE1" size="20" id="input">
<br>
Navn:<br>
<INPUT TYPE=text  name="DESCR1" id="input" size="20"><br>
Tekst:<br>
<textarea rows="4" name="Tekst" cols="20"></textarea><br>
Billedserie:<br>
<select size="1" name="billedserie">
<option value="0">Vælg her:</option>
</select><BR>
<br>
<INPUT TYPE=submit VALUE="Upload!" id="input">
</FORM>


Uploads scriptet:
------------------->
<%
dim StrFileName, strDrec
dim intHeight, intWidth   
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.SaveVirtual "img/"
%>
<h1>Billede uploaded..!!</h1>
<%
For Each File in Upload.Files
StrFileName = File.ExtractFileName
intHeight = File.ImageHeight
intWidth = File.ImageWidth
Response.Write "Billedet : " & File.ExtractFileName & " (" & File.Size & ") blev uploaded.<BR>"
Next

For Each Item in Upload.Form
strDrec = Item.Value
Next
objRS.AddNew
objRS("Height") = intHeight
objRS("Width") = intWidth
objRS("filnavn") = StrFileName
objRS("navn") = strDrec
objRS("tekst") = request.form("tekst")
objRS("billedserie") = request.form("billedserie")
Response.Write "<IMG SRC=""img/" & StrFilename & """><BR>"
objRS.Update

For Each Item in Upload.Form
Response.Write Item.Value & "<BR>"
Next
   
Response.Write "<BR><A HREF=billeder.asp?PictureAction=Se> Klik her for at se alle billeder</A><BR>"
Response.Write "<A HREF=billeder.asp?PictureAction=Upload> Klik her for at uploade et billede</A><BR>"

end if
%>
----------------------------------------------


Håber I kan hjælpe...

/Bruhn
Avatar billede erikjacobsen Ekspert
30. april 2003 - 13:13 #1
Ikke request.form("tekst") men upload.form("tekst")
Avatar billede zantiago Nybegynder
30. april 2003 - 13:17 #2
Tak :o) Send lige et svar
Avatar billede erikjacobsen Ekspert
30. april 2003 - 13:17 #3
Tak, jeg samler ikke på point
Avatar billede zantiago Nybegynder
30. april 2003 - 13:18 #4
Nå ok - Takker mange gange så...
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