Tema dificil, para expertos.

[Hanko1]

Mi problema es el siguiente:

" Como puedo leer un archivo de tipo binario, que se encuentra en el cliente. Este debe asignarse a una variable para pasarla por parámetros a una COM. Esta COM toma esa variable y la almacena en un campo Imagen de una base de datos. "

He intentado muchas cosas, pero necesito alguna iluminación del mas hallá.

[bakanzipp]

echale una mirada a las componentes (que hay echas) encargadas de subir archivos que trabajan las imagenes como objeto OLE (tipo binario)...en
<a href='ir.asp?http://www.aspupload.com' target='_blank'>http://www.aspupload.com...</a> hay unas gratis pero tb se puede hacer sin usar componentes usando parece el xelupload..me parece haberlo visto en algun mensaje del foro...quizas en <a href='ir.asp?http://ww.aspfacil.com' target='_blank'>http://ww.aspfacil.com...</a> haya mas informacion sobre esto.

:P

[Antonito]

Que son los com??? Puertos????


Salutti

"Ya no nos es posible separar lo ordenado de lo caótico, ni poner en duda que la innovación es ante todo fruto de una realidad en desequilibrio, gracias a al cual el azar irrumpe creativamente"

Escohotado (Orden y Caos)

[email protected]

[galindox]

ANTONIO, todo lo que te dice BAKANZIP es correcto, pero tambien se puede hacer sin componentes te mando un ejemplo que sube un archivo binario a una base de datos desde un formulario:
f Request.QueryString(&quot;action&quot;)=&quot;uplo ad&quot; then
Response.Expires = 0
Response.Buffer = TRUE
Response.Clear

Dim UploadRequest
Set UploadRequest = CreateObject(&quot;Scripting.Dictionary&quot;)

ByteCount = Request.TotalBytes
RequestBin = Request.BinaryRead(byteCount)
BuildUploadRequest RequestBin


Dim aux, aux1, FILEFLAG

Dim ImageName, ContentType, FilePathName, FileName, Value
ImageName=UploadRequest.Item(&quot;ImageName&quot; ).Item(&quot;Value&quot;)
ImageName=replace(ImageName, &quot;'&quot;, &quot;''&quot;)

on error resume next
ContentType =UploadRequest.Item(&quot;File&quot;).Item(&quot;C ontentType&quot;)
FILEFLAG = err.number
on error goto 0

if FILEFLAG = 0 then
ContentType = UploadRequest.Item(&quot;File&quot;).Item(&quot;Co ntentType&quot;)
FilePathName = UploadRequest.Item(&quot;File&quot;).Item(&quot;Fi leName&quot;)
FileName = Right(filepathname,Len(filepathname)-InstrRev(filepathname,&quot;\&quot;))
Value = UploadRequest.Item(&quot;File&quot;).Item(&quot;Va lue&quot;)
else
FileName = &quot;&quot;
end if

if filename&lt;&gt;&quot;&quot; then
adoCn.Execute(&quot;INSERT INTO images (ImageName, FileName, MimeType) VALUES ('&quot; &amp; ImageName &amp; &quot;','&quot; &amp; FileName &amp; &quot;', '&quot; &amp; ContentType &amp; &quot;')&quot;)
adoRs.open &quot;select top 1 * from Images order by ImageID DESC&quot;, adoCn, 1, 3
if not adoRs.eof then
adoRs.Fields(&quot;Bindata&quot;).appendChunk value &amp; chrB(0)
adoRs.Update
adoRs.close
end if
end if

set UploadRequest = nothing
End If

[Hanko1]

Galindox.
Esta claro todo, pero
como asigno a:
UploadRequest.Item(&quot;File&quot;).Item(&quot;Co ntentType&quot;) el path donde se encuentra la imagen física, y no usando el objeto file que oprovee html.

O seo puedo asignar el path de la imagen fisica o ContentType de acuerdo a tu ejemplo??? ;)