0

我有一个网站,用户可以选择观看第三方网站上的视频(无版权)。从用户选择它的那一刻起,它需要先下载到我的网络服务器上,然后用户才能访问它。我尝试在第 3 方网站上自动开始下载并使用此路径进行 response.redirect,但是当用户观看视频时,如果视频仅下载 10 秒,任何播放器/浏览器都会将此视频视为10 秒视频并在 10 秒后停止。

重定向流而不是文件的最佳做法是什么?

4

1 回答 1

1

我发现这段代码正是我想要的。它在第三方网站上下载一个文件,并在流式传输文件时,将每个块写入响应中,以便完全混淆来源。因此,可以提供来自任何网站的任何文件,就好像我拥有它一样。

Private Sub SendFile(ByVal url As String)
    Dim stream As System.IO.Stream = Nothing
    Dim bytesToRead As Integer = 10000
    Dim buffer() As Byte = New Byte((bytesToRead) - 1) {}

    Try

        Dim fileReq As System.Net.WebRequest = CType(System.Net.HttpWebRequest.Create(url), System.Net.HttpWebRequest)
        Dim fileResp As System.Net.HttpWebResponse = CType(fileReq.GetResponse, System.Net.HttpWebResponse)
        If (fileReq.ContentLength > 0) Then
            fileResp.ContentLength = fileReq.ContentLength
        End If
        stream = fileResp.GetResponseStream
        Dim resp As System.Web.HttpResponse = HttpContext.Current.Response
        resp.ContentType = "application/octet-stream"
        resp.AddHeader("Content-Disposition", ("attachment; filename=\""" + ("mp3" + "\""")))
        resp.AddHeader("Content-Length", fileResp.ContentLength.ToString)
        Dim length As Integer = 1000000
        While (length > 0)
            If resp.IsClientConnected Then
                length = stream.Read(buffer, 0, bytesToRead)
                resp.OutputStream.Write(buffer, 0, length)
                resp.Flush()
                buffer = New Byte((bytesToRead) - 1) {}
            Else
                length = -1
            End If        
        End While
    Catch
        stream.Close()
    Finally
        If (Not (stream) Is Nothing) Then
            stream.Close()
        End If
    End Try
    Response.End()
End Sub
于 2012-09-11T04:33:18.387 回答