展开全部
文本文件,图像文件,视频文件这些东西在计算机内本来就是以二进制存储的,不用变他们都是以二进制形式真实存在在硬件系统上的,但在程序开发里,基本上最小的单位是字节(汇编、Keil C这种东西除外),而这些字节在运算里只不过是一个存储空间大小的概念,通常是以10进制数字来表示和判断的,当然也可用如 0x00、&H00 这种16进制表示方式来说明这个空间里的值是什么。但从文件数据的角度看,这些文件数据都是一个一个字节数据所构成,所以,这种字节流数据在程序的角度看是以一个个字节的方式出现和处理的,和真正硬件层的二进制存储原理是没多大关系的。
如果你想把这些文件的数据连续的排放到一个文件里,就在程序里直接用读写文件的语句直接操作这些文件就可以了,比如VB可以这么做:
Dim ReadBytes() As Byte
Open "C:\合并的文件.dat" For Binary As #1 ' 打开要合成的文件,注意这个 #1 就是文件号
' ---------- 读取第一个文件内容 ----------
Redim ReadBytes(FileLen("C:\文本文件.txt")-1) ' 设置字节数组大小为这个文件的大小
Open "C:\文本文件.txt" For Binary As #2 ' 打开这个文件
Get #2,1,ReadBytes ' 从这个文件的开始处读取这个文件的数据
Close #2 ' 关闭文件
Put #1,,ReadBytes ' 将读取到的数据写入合成文件
' ---------- 读取第二个文件内容 ----------
Redim ReadBytes(FileLen("C:\图像文件.jpg")-1)
Open "C:\图像文件.jpg" For Binary As #2
Get #2,1,ReadBytes
Close #2
Put #1,,ReadBytes
' ---------- 读取第三个文件内容 ----------
Redim ReadBytes(FileLen("C:\视频文件.flv")-1)
Open "C:\视频文件.flv" For Binary As #2
Get #2,1,ReadBytes
Close #2
Put #1,,ReadBytes
Close #1 ' 关闭合成文件
如果你想把这些文件的数据连续的排放到一个文件里,就在程序里直接用读写文件的语句直接操作这些文件就可以了,比如VB可以这么做:
Dim ReadBytes() As Byte
Open "C:\合并的文件.dat" For Binary As #1 ' 打开要合成的文件,注意这个 #1 就是文件号
' ---------- 读取第一个文件内容 ----------
Redim ReadBytes(FileLen("C:\文本文件.txt")-1) ' 设置字节数组大小为这个文件的大小
Open "C:\文本文件.txt" For Binary As #2 ' 打开这个文件
Get #2,1,ReadBytes ' 从这个文件的开始处读取这个文件的数据
Close #2 ' 关闭文件
Put #1,,ReadBytes ' 将读取到的数据写入合成文件
' ---------- 读取第二个文件内容 ----------
Redim ReadBytes(FileLen("C:\图像文件.jpg")-1)
Open "C:\图像文件.jpg" For Binary As #2
Get #2,1,ReadBytes
Close #2
Put #1,,ReadBytes
' ---------- 读取第三个文件内容 ----------
Redim ReadBytes(FileLen("C:\视频文件.flv")-1)
Open "C:\视频文件.flv" For Binary As #2
Get #2,1,ReadBytes
Close #2
Put #1,,ReadBytes
Close #1 ' 关闭合成文件
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询