<% Dim objStream, strFileName strFileName = Request.QueryString("file") Set objStream = Server.CreateObject("ADODB.Stream") objStream.Type = 1 ' adTypeBinary objStream.Open ' objStream.LoadFromFile Server.MapPath("nomecartella/" & strFileName) objStream.LoadFromFile Server.MapPath(strFileName) ' Istruiamo il browser sul tipo di file Response.AddHeader "Content-Disposition", "attachment; filename=" & strFileName Response.ContentType = "application/octet-stream" Response.BinaryWrite objStream.Read objStream.Close Set objStream = Nothing %>

Al messicano

Vai ai contenuti

Menù d'asporto

Guarda il nostro Nuovo menù d'asporto cliccando qui




Oppure se vuoi scaricare il nostro menù d'asporto clicca qui

Torna ai contenuti | Torna al menu