---
title: "AspUpload igen..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/39144-aspupload-igen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "timedia"
published: "2002-03-07T10:16:03.000Z"
updated: "2002-03-07T10:54:45.000Z"
replies: 1
views: 216
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/39144-aspupload-igen"
---

# AspUpload igen...

## #1 — timedia, 2002-03-07T10:16Z

Har problem med AspUpload. Följande kod ger felet:

```
Feltyp:
Request-objekt, ASP 0208 (0x80004005)
Det går inte att använda den allmänna Request-samlingen efter att BinaryRead har anropats.
/komforb/html/admin/redfst2.asp, line 25
```

Här är sidan som ger fel:

```
<!-- #include file="protect.inc" -->
<html>
<!-- #include file="adovbs.inc" -->
<body bgcolor="#FFCC66">
<%

	Set Upload = Server.CreateObject("Persits.Upload.1")

	Upload.Save
	Set File = Upload.Files(1)

	rubrik = upload.Form("rubrik")
	forstas = upload.Form("forstas")
	brodtext = upload.Form("brodtext ")
	kurs = upload.Form("kurs")
	kursdate = upload.Form("kursdate")

	If File.ImageType <> "GIF" and File.ImageType <> "JPG" Then
	Response.Write "Filen måste vara av typen JPEG eller GIF"
	else

	Set Connection = Server.CreateObject("ADODB.Connection")
	Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../../sys/komforb.mdb") 

	SQLStmt = "UPDATE into aktuellt WHERE ID = " & request("Id")
	SQLStmt = SQLStmt  & " (rubrik, forstas, brodtext, kurs, kursdate)"
	SQLStmt = SQLStmt  & " Values('" & rubrik & "', '" & forstas & "', '" & brodtext & "', '" & kurs & "', '" & kursdate & "')"
	Connection.Execute(SQLStmt)
	SET SQLStmt = Nothing

	SQLStmt = "Select  Id as senasteid from aktuellt"
	SET RS = Connection.Execute(SQLStmt)
	senasteid = RS("id")
	RS.Close
	SET SQLStmt = Nothing

	If file.ImageType = "GIF" Then
	Extension = "gif"
	elseif file.ImageType = "JPG" Then
	Extension = "jpg"
	End If

	filnamn = "bild" & id & "." & Extension

	For Each File in Upload.Files
	File.Copy 	"/images/bild" & id & "." &  Extension
	File.Delete 
	Next

	SQLStmt = "Update aktuellt "
	SQLStmt = SQLStmt  & " SET Bild = '" & Filnamn & "'"
	SQLStmt = SQLStmt  & " Where Id = " & id
	Connection.Execute(SQLStmt)
	SET SQLStmt = Nothing

	Connection.Close
End If 

%>

   Sådär! Nu är databasen uppdaterad. Kontrollera för att se att uppgifterna du nyss fyllt i 
   verkligen har uppdaterats.

   <p>
   <a href="default.asp">Logga Ut!</a></p>

</html>
```

Någon vänlig själ som kan hjälpa?

Permalänk: https://www.webforum.nu/p/39144

## #2 — solbulle, 2002-03-07T10:54Z

Det är väl request("Id") som ger felmeddelandet. Om jag inte missminner mig kan du inte använda, precis som felmesset säger, detta när du kör uploadköret.

Alt. 1 kanske går att ge en variabel det värdet innan du kör:
Set Upload = Server.CreateObject("Persits.Upload.1")

Alt. 2 (Nog att föredra) Få tag i Id med hjälp av:
Id = upload.Form("Id")

Om det är möjligt, (sätt i ett hiddenfält kanske?)

Permalänk: https://www.webforum.nu/p/621187

---

Tråden på webben: https://www.webforum.nu/amne/asp/39144-aspupload-igen
