Discussion :

[the_ugly]

C'est de l'ASP, syntaxe VBScript.

Voilà le code de ma page "telecharger.asp" :

<%
response.clear() ' Vide le buffer

'type de fichier
type=request("type")

' Dialogue de téléchargement
Select Case type
case 1
'excel
response.contentType = "application/vnd.ms-excel"
case 2
'word
response.contentType = "application/vnd.msword"
case 3
'texte
response.contentType = "text/plain"
case else
'autre
response.contentType = "application/octet-stream"
end select

'response.addHeader "Content-Disposition","attachment: filename=" & request("dwn")
response.addHeader "Content-Disposition "&request("dwn"),"attachment: filename=" & request("dwn")

response.flush() ' Envoie le buffer

' Lecture du fichier
set FSO = Server.CreateObject("Scripting.FileSystemObject")
'set stream = FSO.OpenTextFile(server.mapPath(request("dwn")),1,false)
set stream = FSO.OpenTextFile(server.mapPath(request("dwn")))
t = stream.readAll

'stream.close

response.write(t) ' Envoie le contenu du fichier
set stream=NOTHING

'response.write request("dwn")

%>

J'appelle cette page comme ceci :
<A href="telecharger.asp?type=1&dwn='/fichiers/CRAM.xls'">Test</A>

et je me retrouve avec cette erreur :

Type d'erreur :
Erreur de compilation Microsoft VBScript (0x800A0400)
Instruction attendue
/telecharger.asp, line 5
type=request("type")

Question : Pourquoi????????????

[pc75]

Bonjour,

A priori, le mot "Type" est un mot réservé.

[the_ugly]

Effectivement, en remplaçant par "appli" ça marche mieux merci. Enfin, il passe dans le select mais le téléchargement ne marche pas.