binære filer

Prøv at kikke her:
http://www.freevbcode.com/ShowCode.Asp?ID=752

----

Response.ContentType = \"image/gif\"
fs=CreateObject(Scripting.FileSystemObject)
Set ts=fs.Opentextfile(\"Image1.gif\",ForReading)
strBinaryData=ts.ReadAll

Response.Write strBinaryData
Response.End

Du kan også bruge AspUpload (www.aspupload.com) eller en lignende komponent. De bør være tilgængelige på webhoteller.
-søren

eagleeye>> har du et eksempel på bruge af den aspbinfile klasse ?

Nej det har jeg faktisk ikke.

jeg kan sagtens læse en HEL binær fil, men så vidt jeg lige kan se er der kun een funktion - BinREadFile - som læser hele filen og gemmer den i en variabel...et array of byte så vidt jeg lige kan se:

Function BinFileRead(ByVal inFileSpec As String) As Variant
    On Error GoTo errHandler
    Dim mHandle
    Dim lngFileLen As Long
    Dim arrData() As Byte
     
    mHandle = FreeFile
    Open inFileSpec For Binary Access Read As #mHandle

    lngFileLen = FileLen(inFileSpec)
    ReDim arrData(lngFileLen)

    Get #mHandle, , arrData
    Close #mHandle
     
    BinFileRead = arrData
    Exit Function

errHandler:
End Function

- burde jeg så ikke kunne udskrive binFile(0) for at læse første plads i arrayet - hvis det er et array ??

altså med:

Response.Write binFile(0)

- eller skal der en-eller-anden konvertering til ?

Og du kalder functionen:

binFile = BinFileRead(Server.MapPath(\"fil.xxx\"))

Du skulle gerne få den første værdi ud.

mFile = \"8hours.mp3\"
mMapFile = Server.MapPath(mFile)
binFile = objBinFile.BinFileRead(mMapFile)

for i = 0 to 127
  Response.Write binFile(i)
next

men den skriver ikke en skid !?

Jeg har fået det til at virke ved at registrer DLL\'en, eks.vis:

Regsvr32.exe D:\\wwwroot\\ASPBinFile2\\ASPBinFile.dll

Fra Start->Kør

det var det første jeg gjorde...

problemet er stadig at hente nogle besteme bytes fra det binFile array !

har du noget kode hvori du gør det ?

Jeg har nu bare brugt det eksempel som var med i zip filen.

Har du evt prøver Response.BinaryWrite binFile(0)

http://www.4guysfromrolla.com/webtech/083100-1.shtml

her.. 7 liner kode til at læse binære filer uden nogle komponenter.. så længe den server køere ADO 2.5.. :)

lukker...