Hej!
Jag får följande fel med följande kod (upload-script). Varför?
Koden:
<%
Set Upload = Server.CreateObject("Persits.Upload.1") '//Skapar uplladdningsobjektet
Upload.SetMaxSize 1000000000 '//Filer som överskrider denna storlek laddas ej upp (bytes)
Upload.SaveVirtual "upload/" '// Mappen som uppladdade filer hamnar i
Upload.OverwriteFiles = True '// Fil med samma namn som existerande filnamn skriver over (har booleskt värde, kan sattas till false)
If Upload.Files(1).ImageType = "mp3" or Upload.Files(1).ImageType = "wav" Then
Upload.Files(1).Delete
Session("mess") = "<font color='#880000'>Du får inte ladda upp filer av det formatet!</font>"
Response.Redirect("docs.asp")
Else
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../db/db.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * From galleri"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
RecSet.AddNew
RecSet("kategori_swe") = Request.Form("kategori_swe")
RecSet("kategori_eng") = Request.Form("kategori_eng")
RecSet("fil") = Upload.Files(1).ExtractFileName
RecSet("datum") = Now()
RecSet("size") = Upload.Files(1).Size
RecSet.Update
RecSet.close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
Session("mess") = "<font color='green'>Filen laddades upp!</font>"
Response.Redirect "default.asp?sida=galleri&type=show"
End if
%>
Felmeddelande:
Feltyp:
Request-objekt, ASP 0207 (0x80004005)
Det går inte att använda samlingen Request.Form efter att BinaryRead har anropats.
/arbajten/agren/administration/upload.asp, line 44
Mycket tacksam för svar! Tack! /Patrik