需要流文件以进行上传/下载

时间:2013-04-30 19:03:56

标签: jquery html5 asp-classic

我被困住了。我正在使用不允许直接上传的服务器。我希望能够使用HTML5读取文件,如果它是文本,它可以正常工作,但不是图像:

 reader.onloadend = function(evt) {
  if (evt.target.readyState == FileReader.DONE) { // DONE == 2
    document.getElementById('data').textContent = evt.target.result;
            console.log(evt.target.result);
    //document.getElementById('byte_range').textContent = 
      //  ['Read bytes: ', start + 1, ' - ', stop + 1,
     //    ' of ', file.size, ' byte file'].join('');
            updatePage();
  }
};              

if (file.type.match("text*") || (file.type.match() == '')){
    //var blob = file.slice(start, stop + 1);
    reader.readAsBinaryString(file);

    }else{
        reader.readAsDataURL(file);

    }

下一页用经典的asp:

编写的数据无法读取
Dim strSourceFile, strFolder
Dim strFileName, fsc, fname, c,f,d

c= Request.Form("c")
f= Request.Form("f")
d= Response.BinaryWrite(Request.Form("d")) 


f= Server.mappath("\uploads") & "\" & f

'works for text files   
set fsC=Server.CreateObject("Scripting.FileSystemObject")
set fname=fsC.CreateTextFile(f,true)
fname.Write(d)
fname.Close
set fname=nothing
set fsC=nothing

Response.ContentType = "image/JPEG" 

'isn't working for either
Const adTypeBinary = 1
Const adSaveCreateOverWrite = 2
dim bStream : set bStream = server.CreateObject("ADODB.stream")
bStream.type = adTypeBinary
call bStream.Open()
call bStream.Write(d)
call bStream.SaveToFile(strSourceFile, adSaveCreateOverWrite)
call bStream.close()
set bStream = nothing

0 个答案:

没有答案