Convertir datos binarios a una cadena con Recordset. NO PUEDO

[bebo]

Tengo el siguiente código que lee los datos binarios:

Código ASP:

bytes=200000
origen=request.binaryread(bytes)
origen=midb(origen,1,lenb(origen))
for i=0 to 300000
temporal=request.binaryread(bytes)
if bytes<1 then exit for
origen=origen&midb(temporal,1,lenb(temporal))
next
 

Y los convierto al tipo string asi:

Código ASP:

Set rs=createobject("ADODB.Recordset")
rs.fields.append "datos",201,lenb(origen)
rs.open
rs.addnew
rs("datos").appendchunk origen
rs.update
 

Pero cuando hago esto: response.write rs("datos") no sale nada.
¿Alguien sabe como hacer esto?