webForumDet fria alternativet

[JSCRIPT] BinaryWrite

0 svar · 196 visningar · startad av Wickmark

WickmarkMedlem sedan juli 2003162 inlägg
#1

LÖST!
Fjöntigt patetiskt fel :r
Aja, ContentType ska ju vara:
Response.ContentType = sContent
------------------------------------------------------------

Hej hej!
Jag håller på med ett 'nerladdningsprogram' som ska påtvinga nerladdning oavsett filtyp. Jag har fått ihop en ganska skaplig kod - men tyvärr så fungerar den ej.

Vad gör jag fel?

<%
var sFile      = new String(Request.QueryString("file")),
    sExtension = sFile.substr(sFile.lastIndexOf(".") + 1,sFile.length),
	sPath      = new String(Request.QueryString("path")),
	sLPath     = Server.MapPath(sPath) + '\\',
	sContent;
	
     switch(sExtension) {
       case "asf":
	     sContent = "video/x-ms-asf";
	   break;
	   case "avi":
	     sContent = "video/avi";
	   break;
	   case "doc":
	     sContent = "application/msword";
	   break; 
	   case "zip": 
	     sContent = "application/zip";
	   break;
	   case "xls":
	     sContent = "application/vnd.ms-excel";
	   break;
	   case "gif":
	     sContent = "image/gif";
	   break;
	   case "jpg", "jpeg":
	     sContent = "image/jpeg";
	   break;
	   case "png":
	     sContent = "image/png";
	   break;
	   case "wav":
	     sContent = "audio/wav";
	   break;
	   case "mp3":
	     sContent = "audio/mpeg3";
	   break;
	   case "mpg", "mpeg":
	     sContent = "video/mpeg";
	   break;
	   case "pdf":
	     sContent = "application/pdf";
	   break;
	   case "rtf":
	     sContent = "application/rtf";
	   break;
	   case "htm", "html":
	     sContent = "text/html";
	   break;
	   case "zip":
	     sContent = "application/archive"
	   break;
	   case "asp", "php":
	     sContent = "text/" + sExtension;
	   break;
	   default:
	     sContent = "application/octet-stream"; 
    }
	
	Response.ContentType(sContent);
	Response.AddHeader("Content-Disposition", "attachment; filename=" + sFile);
	
	   var oADO = Server.CreateObject("ADODB.Stream");
	       oADO.Open();
		     oADO.Type = 1;
		       oADO.LoadFromFile(sPath + sFile);
			     oADO.BinaryWrite(oADO.Read());
		   oADO.Close();

%>

Jag får följande fel:

Microsoft JScript runtime  error '800a01c3'

Object not a collection

/LWSWE/SiteAdmin/download.asp, line 64

(där 'Response.ContentType(sContent);' är rad 64)

137 ms totalt · 3 externa anrop · v20260731065814-full.3ab8d573
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
135 ms — hämta tråd, inlägg och bilagor (db)