--- title: "AspUpload - HJÄLP!!!" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/5580-aspupload-hjälp" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "mikael_a" published: "2000-04-18T09:39:00.000Z" updated: "2000-04-19T13:53:00.000Z" replies: 4 views: 184 page: 1 pages: 1 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/5580-aspupload-hjälp" --- # AspUpload - HJÄLP!!! ## #1 — mikael_a, 2000-04-18T09:39Z hej, är det någon som har hållt på med komponenten ASPUpload? jag får följande fel när jag försöker att spara lite info ifrån ett formulär + en bilds sök väg. "Ett fel uppstod på filen: 006\~ASP 0207\~Det går inte att använda Request.Form\~Det går inte att använda samlingen Request.Form efter att BinaryRead har anropats." filen som skapar detta fel är: \*\*\*\* \<% Set Upload = Server.CreateObject("Persits.Upload.1") Count = Upload.Save("d:\\Inetpub\\wwwroot\\") On Error Resume Next For Each File in Upload.Files File.ToDatabase "DSN=film_nyheter;UID=sa;PWD=;", "insert into film_nyheter(o_titel, s_titel, regissor, skadespelare, kategori, speltid, prod_ar, distributor, url, Image1, filename) values('" & (Request.Form("o_titel")) & "', '" & (Request.Form("s_titel")) & "', '" & (Request.Form("regissor")) & "', '" & (Request.Form("skadespelare")) & "', '" & (Request.Form("kategori")) & "', '" & (Request.Form("speltid")) & "', '" & (Request.Form("prod_ar")) & "', '" & (Request.Form("distributor")) & "', '" & (Request.Form("url")) & "', '" & (Request.Form("Image1")) & "', '" & File.Path & "', ?)" if Err \<\> 0 Then Response.Write "Ett fel uppstod på filen: " & Err.Description Else File.Delete Response.Write "Databasen uppdaterades!" End If Next %\> \<% = Count %\> fil är sparad i databasen \*\*\* jag förstår att det är något med mina request.forms, men hur skall jag annars kunna uppdatera datan i dessa celler? någon ide? om jag kör filen : \*\*\*\*\*\*\* \<% Set Upload = Server.CreateObject("Persits.Upload.1") Count = Upload.Save("d:\\Inetpub\\wwwroot\\") On Error Resume Next For Each File in Upload.Files File.ToDatabase "DSN=film_nyheter;UID=sa;PWD=;", "insert into film_nyheter(filename, Image1) values('" & File.Path & "', ?)" if Err \<\> 0 Then Response.Write "Ett fel uppstod på filen: " & Err.Description Else File.Delete Response.Write "Databasen uppdaterades!" End If Next %\> \<% = Count %\> fil är sparad i databasen \*\*\*\* så fungerar det... fast ett lustigt fel är att sökvägen stämmer i databasen till bilden, men den visas ej i min upload katalog, i detta fallet rooten... sedan när jag försöker att visa bilden genom filen : \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\* \<% Set Connection = Server.CreateObject("ADODB.Connection") Connection.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=d:\\Inetpub\\wwwroot\\databas\\film_nyheter.mdb" SQLStmt = "SELECT \* FROM film_nyheter" Set RS = Connection.Execute(SQLStmt) Response.ContentType = "image/jpeg" Response.AddHeader "Content-Disposition", "filename=yourfile.ext" Response.AddHeader "Content-Length", "545645" Response.BinaryWrite rs("Image1") %\> \ \\ \ \www.video-center.nu\ \ \ \