/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Streaming
Fra : Jens Jensen


Dato : 24-06-02 11:57

Nedenstående kode virker sådan set, men den fil som der bliver download kan
ikke genkendes af Access. Det er en Access database som bliver download og
som har den sammestørrelse. Nu er det så jeg ikke kan finde ud af hvorfor
filen ændre struktur, eller hvad det nu hedder.

Håber en kan hjælpe en uviden som mig
Michael


<%
Dim objStream
Set objStream = Server.CreateObject("ADODB.Stream")

objStream.Type = 1 ' Her sætter vi at det er en binær fil
objStream.Open
objStream.LoadFromFile "Sti til filen"

Response.ContentType = "multipart/mixed"
Response.BinaryWrite objStream.Read
Response.AddHeader "content-disposition", "attachment;
filename=strandvejslobet.mdb"

objStream.Close
Set objStream = Nothing
%>




 
 
Jesper Stocholm (24-06-2002)
Kommentar
Fra : Jesper Stocholm


Dato : 24-06-02 12:18

Jens Jensen wrote in news:af6ttg$nbs$1@news.net.uni-c.dk:

> Nedenstående kode virker sådan set, men den fil som der bliver
> download kan ikke genkendes af Access. Det er en Access database som
> bliver download og som har den sammestørrelse. Nu er det så jeg ikke
> kan finde ud af hvorfor filen ændre struktur, eller hvad det nu
> hedder.
>
> Håber en kan hjælpe en uviden som mig
> Michael
>
>
> <%
> Dim objStream
> Set objStream = Server.CreateObject("ADODB.Stream")
>
> objStream.Type = 1 ' Her sætter vi at det er en binær fil
> objStream.Open
> objStream.LoadFromFile "Sti til filen"
>
> Response.ContentType = "multipart/mixed"
> *Response.BinaryWrite objStream.Read
> *Response.AddHeader "content-disposition", "attachment; filename=strandvejslobet.mdb"
du skal bytte om på rækkefølgen af disse to linier herover (markeret
med *)

Der skal self først skrives til browseren når alle headers er sat.

> objStream.Close
> Set objStream = Nothing

Jeg har tidligere brugt følgende (med succes)

<%@Language=VBScript%>
<%
set oStream = server.createobject("ADODB.Stream")
oStream.Type = 1 'adTypeBinary
oStream.Open

oStream.LoadFromFile (server.mappath("db.mdb"))

Response.ContentType = "application/octet-stream"
Response.Addheader "Content-Disposition", "inline; filename=db.mdb"
Response.BinaryWrite oStream.Read

oStream.Close
set oStream = nothing
%>

:)

--
Jesper Stocholm
http://stocholm.dk
http://asp.stocholm.dk
Svar til gruppen og ikke til mig privat pr. email :|

Jens Jensen (24-06-2002)
Kommentar
Fra : Jens Jensen


Dato : 24-06-02 12:54

Jeg kan desværre ikke få dit eksempel til at virke.

Had mener du med?

Der skal self først skrives til browseren når alle headers er sat.

objStream.Close
Set objStream = Nothing





Jesper Stocholm (24-06-2002)
Kommentar
Fra : Jesper Stocholm


Dato : 24-06-02 13:07

Jens Jensen wrote in news:af717v$oga$1@news.net.uni-c.dk:

> Jeg kan desværre ikke få dit eksempel til at virke.
>
> Had mener du med?
>
> Der skal self først skrives til browseren når alle headers er sat.
>
> objStream.Close
> Set objStream = Nothing

som beskrevet på www.usenet.dk skriver jeg/man _under_ det man svarer på.
Derfor vil det jeg skrev skulle læses som:

****************************************************************
> *Response.BinaryWrite objStream.Read
> *Response.AddHeader "content-disposition", "attachment; filename=strandvejslobet.mdb"
du skal bytte om på rækkefølgen af disse to linier herover (markeret
med *)

Der skal self først skrives til browseren når alle headers er sat.
****************************************************************

Hvad mener du med, at du ikke kan får mit script til at virke ? Du er
nødt til at kvalificere det mere end det ... ellers skal jeg sidde og
gætte ... og det er lidt dumt.

:)

--
Jesper Stocholm
http://stocholm.dk
http://asp.stocholm.dk
Svar til gruppen og ikke til mig privat pr. email :|

Jens Jensen (24-06-2002)
Kommentar
Fra : Jens Jensen


Dato : 24-06-02 13:22

> > Jeg kan desværre ikke få dit eksempel til at virke.
> >
> > Had mener du med?
> >
> > Der skal self først skrives til browseren når alle headers er sat.
> >
> > objStream.Close
> > Set objStream = Nothing
>
> som beskrevet på www.usenet.dk skriver jeg/man _under_ det man svarer på.
> Derfor vil det jeg skrev skulle læses som:
>
> ****************************************************************
> > *Response.BinaryWrite objStream.Read
> > *Response.AddHeader "content-disposition", "attachment;
filename=strandvejslobet.mdb"
> du skal bytte om på rækkefølgen af disse to linier herover (markeret
> med *)
>
> Der skal self først skrives til browseren når alle headers er sat.
> ****************************************************************
>
> Hvad mener du med, at du ikke kan får mit script til at virke ? Du er
> nødt til at kvalificere det mere end det ... ellers skal jeg sidde og
> gætte ... og det er lidt dumt.
>
> :)

Sikke meget jeg lære i dag. Da jeg skulle genskabe fejlen fik jeg det til at
virke??? Nogle ting skal jeg nok ikke forsøge at forstå. Under alle
omstændigheder, mange tak for hjælpen

Michael



Søg
Reklame
Statistik
Spørgsmål : 177559
Tips : 31968
Nyheder : 719565
Indlæg : 6408938
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste