Eureka, j'ai trouvé !!!!!
Je me suis fait une procédure qui fonctionne bien pour ce problème :
Sub downloadFile(ByVal ls_filename As String, ByVal ls_adresse As String)
Response.Buffer = False 'je veux downloder un fichier Excel Response.ContentType = "application/vnd.ms-excel" Response.AddHeader("Content-Disposition", "attachment;filename=" & ls_filename) Response.WriteFile(ls_adresse) Response.Flush() Response.End() End Sub
SeHN
|