O q está errado no meu código para inserir binario ?

[khots 0]

Olá pessoal o código é o seguinte :

Set Objstr = Server.CreateObject("ADODB.Stream")ObjStr.Type  = 1 ObjStr.OpenObjstr.LoadFromFile "c:/teste.txt"MyBinaryData = ObjStr.ReadSet  ObjStr = NothingResponse.ContetType = "application/octet-stream"Response.AddHeader "Content-Disposition", "attachment;filename=teste.txt"Response.AddHeader "Content-Length", lenb(MyBinaryData)Response.BinaryWrite MyBinaryDataResponse.End

Mas fala q não pode abrir o arquivo...

alguém pode me ajudar ??

vlw

abraços

[Marcelo Barcellos 0]

você tem permissão no servidor ?O Arquivo existe ?E esse código não insere binário, mas força Download de um arquivo.

[khots 0]

Qual o codigo pra transformar pra binario então ?

[Marcelo Barcellos 0]

A primeira parte do seu código tranforma em binário.A segunda, força um download.

[khots 0]

No loadfromfile eu coloquei uma variavel q captura o contudo de um input name do tipo file de um form.. mas n ta dando certo..pode me da um força /?Preciso capturar o arquivo do form.uso :imagem1 = request.Form("imagem1")Objstr.LoadFromFile imagem1apareçe isso :File could not be opened. vlwabraçoss

[Marcelo Barcellos 0]

Khosts...Já disse no seu outro POST....Fazer upload não é assim.Não basta incluir um "Input file", tem várias outras coisas que precisam ser feitas...Antes de guardar a imagem no banco, aprenda a fazer um Upload.