Problème avec ADODB.Stream

[Poussy-Puce]

Bonjour, j'essaye d'utiliser ADODB.Stream, mais ça ne fonctionne pas!!! Voici ce que j'ai dans ma page:

Code :

1
2
3
4
5
6
7
8
9
10
11
Const  adTypeBinary = 1
Response.AddHeader "Content-Disposition", "attachment; filename=cblas.mdc"
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile("d:\SiteWeb\fichier\powerplay\cblas.mdc")
 
Response.BinaryWrite objStream.Read
 
objStream.Close
Set objStream = Nothing

Ça m'ouvre bien la fenêtre 'Open, Save', mais ça essaye de transférer ma page asp!!!

Y'as-tu quelqu'un qui comprend il est où mon problème...

Et y'as-tu quelqu'un qui saurait me dire jusqu'à qu'elle grosseur de fichier cela va fonctionner...

Merci beaucoup d'avance

[Poussy-Puce]

Bon je l'ai, il veut downloader le bon fichier, mais il ne le fait pas, il download bien l'icône, mais le fichier est vide!!!

Voici mon nouveau bout de code

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
Const  adTypeBinary = 1
Response.ContentType = "application/octet-stream"
Response.AddHeader "Content-Disposition", "attachment; filename=cblas.mdc"
response.flush()
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile("d:\SiteWeb\fichier\powerplay\cblas.mdc")
 
Response.BinaryWrite objStream.Read
 
objStream.Close
Set objStream = Nothing