<%@ Language=VBScript %> <% Set DB = Server.CreateObject("ADODB.Connection") DB.Open Session("aCstrDNS") %> <% Call TitreDisplay ("scen") %> <% ' Get parameter Dim aVstrFile aVstrFile = Request("file") %> <% Server.Transfer aVstrFile %>