以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问狐表后台怎么合并前端发送的通过spark-md5分割的文件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=175248)

--  作者:benben325
--  发布时间:2022/2/25 11:05:00
--  请问狐表后台怎么合并前端发送的通过spark-md5分割的文件
rt,后台是用狐表,前端用的是vue,现在想做个大文件上传功能并且有进度条。。
前端通过 spark-md5 现将大文件分割成100份,然后发送给狐表后台,后台接收后将文件进行合并。。
现在就卡在文件合并这里了,不知道怎么合并。
目前只有node.js后台合并的代码。。不知道怎么改成狐表的。。
nodejs后台代码如下:

图片点击可在新窗口打开查看此主题相关图片如下:111111111111111111111111.png
图片点击可在新窗口打开查看
我用狐表接收到的文件列表截图如下:

图片点击可在新窗口打开查看此主题相关图片如下:22222222222222.jpg
图片点击可在新窗口打开查看
请问,用狐表怎么将这些文件合并成切割前的一个文件?

--  作者:有点蓝
--  发布时间:2022/2/25 11:26:00
--  
我也没看懂。

试试.net里的FileStream类型,就是创建一个新文件,然后按顺序逐个读取分割的文件的文件流,追加到新文件的后面

--  作者:benben325
--  发布时间:2022/2/25 13:09:00
--  
请问这个怎么在狐表里写呢?图片点击可在新窗口打开查看
--  作者:有点蓝
--  发布时间:2022/2/25 13:33:00
--  
https://www.baidu.com/baidu?ie=UTF-8&word=vb.net%20%E5%90%88%E5%B9%B6%E6%96%87%E4%BB%B6

https://docs.microsoft.com/zh-cn/dotnet/api/system.io.filestream?view=netframework-4.0

--  作者:benben325
--  发布时间:2022/2/25 14:24:00
--  
文档看了一遍,没学过vb.net 直接学的狐表,不知道怎么写!
--  作者:benben325
--  发布时间:2022/2/25 14:35:00
--  
Dim fileName As String = "C:\\Users\\Administrator\\Desktop\\bill_test\\111\\f278c75a33a3885c7175997e15cd9778"

For i As Integer = 0 To 99
    Dim fname As String = fileName & "_" & i & ".tif"
    Dim fs As system.io.FileStream =  New system.io.FileStream(fname, system.io.FileMode.Open, system.io.FileAccess.Read, system.io.FileShare.None)
    。。。
Next


--  作者:有点蓝
--  发布时间:2022/2/25 14:57:00
--  
https://www.baidu.com/baidu?ie=UTF-8&word=c%23%20%E5%88%86%E5%89%B2%E5%90%88%E5%B9%B6%E6%96%87%E4%BB%B6

https://www.cnblogs.com/lvdong-1986/p/4272351.html

    Using CombineStream As system.io.FileStream = New system.io.FileStream(“合并后的文件路径和名称.tif”system.io.FileMode.OpenOrCreate)

        Using CombineWriter As system.io.BinaryWriter = New system.io.BinaryWriter(CombineStream)

            For i As Integer = 0 To 99
    Dim fname As String = fileName & "_" & i & ".tif"

                Using fileStream As system.io.FileStream = New system.io.FileStream(fnamesystem.io.FileMode.Open)

                    Using fileReader As system.io.BinaryReader = New system.io.BinaryReader(fileStream)
                        Dim TempBytes As Byte() = fileReader.ReadBytes(CInt(fileStream.Length))
                        CombineWriter.Write(TempBytes)
                    End Using
                End Using
            Next
        End Using
    End Using


--  作者:benben325
--  发布时间:2022/2/25 15:05:00
--  
谢谢老师,成功了!