1、电脑上面新建一个文本文档,然后在新建的文本文档里边输入以下程序代码并保存、关闭。(不要在待合成的ts视频文件夹里面新建,以免后续的vbs脚本程序误把该文件合并)。Dim i, na, str1, str2On Error Resume Next '忽略运行过程中可能出现的错误str1 = "" 'str1、str2初始值置为空值str2 = ""i = 0 'i的初始值置为0Set fs = CreateObject("Scripting.FileSystemObject") '创建并返回对计算机系统文件Set fo = fs.Getfolder("D:\我的视频1\") '定义文件夹,“我的视频1”为D盘下边的文件夹For Each fil In fo.Files '获取文件夹里面所有的文件 na = fil.Name '获取文件名称 i = i + 1 '每扫描一个文件,i自动加1 If i = 1 Then 'i为1,即扫描到第一个文件时,则 str1 = na '把文件名赋给str1 End If If i > 1 Then 'i大于1,即扫描到两个及以上的文件时,则 str1 = str1 & "+" & na '在原有名称的基础上拼接“+”和现在的名称 End IfNextstr2 = "copy /b D:\我的视频1\" & str1 & " D:\我的视频1\我的视频.ts"'cmd命令代码拼接,str1为所有ts文件名称拼接Set fi = fs.CreateTextFile("d:\我的视频1\视频合成命令.bat", True)'在D盘"我的视频2"里边创建 视频合成命令.batfi.WriteLine (str2) '把命令代码写入文件里边fi.Close '关闭文件MsgBox "bat命令已经生成,请到“d:\我的视频1”查看!"
2、重命名新建的文本文档,同时把后缀名“.txt”改成“.vbs”。
3、双击已经重命名的vbs文件,打开待合成的ts视频文件夹,将会看到已经生成的bat命令。
4、如果要查看已经生成的bat命令代码,可以在bat文件上面单击右键,选择“编辑”即可看到里面的代码。
5、双击已经生成的bat命令,ts视频文件合成完成。
6、注意事项(1):合成的ts文件要注意其命名顺序,待合成的ts视频文件较多时,不能直接以1.ts、2.ts、3.ts……10.ts、11.ts的顺序命名,应当在其前面多加一个0,否则将会在生成bat命令里边出现顺序错误。
7、注意事项(2):生成新的ts视频合并文件应当选择在待合成的原文件夹里边,否则合并的ts视频文件不完全(只是其中一个)。
8、注意事项(3):如果要重新合成文件,则需要先把待合成的ts视频文件夹里边已经合成的ts文件、bat命令删除,以免误把这些文件合并进去。