---
title: "Cannot use Request.Form collection after calling BinaryRead"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/11242-cannot-use-request-form-collection-after-calling-binaryread"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Steveking"
published: "2001-08-22T11:44:00.000Z"
updated: "2001-08-22T14:12:00.000Z"
replies: 2
views: 241
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/11242-cannot-use-request-form-collection-after-calling-binaryread"
---

# Cannot use Request.Form collection after calling BinaryRead

## #1 — Steveking, 2001-08-22T11:44Z

Jag använder mig av ett upload script och får det error meddelandet när jag försöker köra 
namn = Request.form("namn")

Jag har också testat med:
namn = Upload.Form("namn")

men får då meddelandet:
Object required: 'Upload'

Själva filuppladningen funkar alltså perfekt. Problemet är när jag ska lägga till namn i ett fält och sen in i db'n.
Alltså en vanlig form som man kör till nyheter osv.

Min kod ser ut såhär

```
<%
' Author Philippe Collignon
' Email PhCollignon@email.com

Response.Expires=0
Response.Buffer = TRUE
Response.Clear
'Response.BinaryWrite(Request.BinaryRead(Request.TotalBytes))
byteCount = Request.TotalBytes
'Response.BinaryWrite(Request.BinaryRead(varByteCount))

RequestBin = Request.BinaryRead(byteCount)
Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")

BuildUploadRequest RequestBin

'email = UploadRequest.Item("email").Item("Value")

contentType = UploadRequest.Item("blob").Item("ContentType")
filepathname = UploadRequest.Item("blob").Item("FileName")
filename = Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
value = UploadRequest.Item("blob").Item("Value")

namn = Upload.Form("namn")
'Ta emot

set Conn=server.createobject("adodb.connection")
	        path="DBQ=" & server.mappath("DB.mdb")
	        conn.open "driver={microsoft access driver (*.mdb)}; " & path," ",""
	        SQL = "Select * from pages"
	        set Rs = Server.CreateObject("ADODB.Recordset")
	        Rs.Open sql, conn, 3, 3
			
			Rs.Addnew
                
        RS("namn") = namn      
        RS("blob") = "test/" & filename
        Rs.Update

		Rs.close
        Conn.close

'Create FileSytemObject Component
Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject")

'Create and Write to a File
pathEnd = Len(Server.mappath(Request.ServerVariables("PATH_INFO")))-14
' Set MyFile = ScriptObject.CreateTextFile(Left(Server.mappath(Request.ServerVariables("PATH_INFO")),pathEnd)&filename)
Set MyFile = ScriptObject.CreateTextFile(Server.mappath("test/"&filename))
response.write(Server.mappath(filename)) 

For i = 1 to LenB(value)
MyFile.Write chr(AscB(MidB(value,i,1)))
Next

MyFile.Close
%>
<b>Uploaded file : </b><%=filename%><BR>
<img src="test/<%=filename%>">
<!--#include file="upload.asp"-->
```

\[Redigerat av Steveking den 22 aug 2001\]

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

## #2 — PatrikB, 2001-08-22T13:54Z

```
namn = UploadRequest.Item("namn").Item("Value")
```

bör funka ...

cya,
PatrikB

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

## #3 — Steveking, 2001-08-22T14:12Z

Underbart. tack patrik

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/11242-cannot-use-request-form-collection-after-calling-binaryread