前端JS 大于5M的文件分片上传 前端JS代码，服务端SVC VB代码

在前端JavaScript中，对于大于5MB的大文件分片上传，可以使用断点续传（Chunked Uploads）技术。这里是一个简化版的前端实现示例，假设我们使用的是Fetch API：

// 定义文件大小限制和块大小
const MAX_FILE_SIZE = 5 * 1024 * 1024; // 5MB
const CHUNK_SIZE = 1024 * 1024; // 1MB

function uploadFile(file) {
  const reader = new FileReader();
  let totalSize = file.size;
  let formData = new FormData();

  // 分块读取并上传
  let byteOffset = 0;
  while (byteOffset < totalSize) {
    const chunkSize = Math.min(CHUNK_SIZE, totalSize - byteOffset);
    const chunk = file.slice(byteOffset, byteOffset + chunkSize);

    reader.readAsArrayBuffer(chunk);
    reader.onload = () => {
      const data = reader.result;
      formData.append('file', data, `chunk_${Math.ceil(byteOffset / CHUNK_SIZE)}`);

      uploadNextChunk(formData, byteOffset + chunkSize);
    };

    reader.onerror = (error) => {
      console.error('Error reading file:', error);
    };
    byteOffset += chunkSize;
  }
}

function uploadNextChunk(formData, offset) {
  fetch('/api/upload', {
    method: 'POST',
    body: formData,
    headers: {
      'Content-Type': 'multipart/form-data'
    },
    credentials: 'include' // 跨域请求需要带上凭据
  })
  .then(response => response.json())
  .then((data) => {
    if (data.success && data.nextOffset) {
      uploadFile(file, data.nextOffset);
    } else {
      console.log(data.message); // 处理错误或成功回调
    }
  });
}

在服务端的ASP.NET MVC或ASP.NET Core SVC（VB.NET代码）中，你需要处理接收到的每个块，存储它们，并在完成后合并：

Imports System.IO
Imports System.Web.Http

' 假设这是控制器方法
Public Class UploadController
    Inherits ApiController
    Private Shared(Of String) _tempFolder As String = "uploads/"

    Public Async Function PostUpload(fileData As HttpPostedFileBase, nextOffset As Long?) As HttpResponseMessage
        If nextOffset.HasValue Then
            Dim tempPath = Path.Combine(_tempFolder, $"{Guid.NewGuid()}.part")
            Using writer As New BinaryWriter(File.Open(tempPath, FileMode.Append))
                Dim buffer = New Byte(nextOffset.Value - writer.BaseStream.Length)
                Await fileData.InputStream.ReadAsync(buffer, 0, buffer.Length)
                writer.Write(buffer)
            End Using

            ' ... 检查文件是否完整，如果完整则继续合并，否则返回错误信息
            ' ...

            Return CreatedAtRoute("GetCompletedUpload", New With {.id = ...}) ' 返回新部分上传的位置
        Else
            ' 处理普通上传
            ' ...
        End If
    End Function
End Class

注意，这只是一个基本的示例，实际生产环境中还需要考虑错误处理、进度反馈、文件合并以及可能的跨域问题等。同时，为了安全性，你可能需要在服务端对上传的数据进行验证和存储策略调整。