通过本文主要向大家介绍了批处理文件,批处理文件怎么写,文件重命名批处理,文件改名批处理,windows批处理文件等相关知识,希望对您有所帮助,也希望大家支持linkedu.com www.linkedu.com
利用批处理文件和 vbs 脚本实现网站视频自动录制
现在电视台基本上都有了自己的门户网站,我们可以充分利用网络的优势来扩大本地电视台的影响。事实上,将本地电视台的每日的王牌节目挂在网站上的做法已经成为建立电视台网站的必要组成步骤之一了。但随之而来的问题是:每天定时需要的手工录制过程,将给管理者带来极大的不便。在 windows 定时任务的基础上,将批处理程序与脚本程序有机的集合,就可以有效地解决这一问题。
1 :建立压码任务
我们将使用一台带有视频采集卡的电脑来完成压码过程。虽然压码不是本文的重点,但还是有必要交代一下。主要就是使用 helix producer plus9 建立一个压码参数文件,事实上它只是一个带有 rpjf 后缀的 xml 文件(图 1 )。需要注意的是,音频输入选项有线路输入与 microphone 输入两种,这需要与实际的接入线路相吻合;另外,不必选择 2 pass vedio encoding 选项,选择它除了显示一个 warning 外不会有任何效果;再者,因为现阶段绝大多数的网络接入模式为拨号和 dsl ,所以只需要生成 56k 和 384k 码率的视频文件;最后,录制完成的视频文件,其名称最好用日期来标识,比如: 20060301.rm 。
<?xml version="1.0" encoding="UTF-8"?>
<job xmlns="http://ns.real.com/tools/job.1.0.1">
<enableTwoPass type="bool">false</enableTwoPass>
<clipInfo>
<entry>
<name>Author</name>
<value type="string">ZSTV</value>
</entry>
<entry>
<name>Copyright</name>
<value type="string">(c) ZSTV2006 </value>
</entry>
<entry>
<name>Keywords</name>
<value type="string">ZSNews[2006-03-21]</value>
</entry>
<entry>
<name>Title</name>
<value type="string">ZSNews[2006-03-21]</value>
</entry>
</clipInfo>
<input>
<captureInput>
<audioDeviceID type="string">Intel(r) Integrated Audio</audioDeviceID>
....................................
我们可以建立一个名为 shixian.bat 的批处理文件来的调用上面所示的参数文件,内部具体如下:
producer -j "d:\shixian\shixian.rpjf" -daw -lc "e,i"
默认的录制过程会实时监控音频变化,并将它记录到一个叫 producer.log 的文件之中,但是产生的 wanging 记录很多,很快就使 log 文件变得巨大而且可能引起录制过程的意外中断,所以我们可以使用 -daw 参数关闭音频监视,再用 lc “e,i” 指明只记录错误和信息。这样做之后,录制过程就比较稳定了。
只要在计划中添加每日执行 shixian.bat 文件的任务,我们就会每天得到一个相同文件属性和名称的 rm 文件。在这里将每天产生一个带有 2006-03-21 属性的、名为 20060321.rm 文件。听起来很拗口,更糟糕的是这并没有减轻管理者的工作,因为他不得不每天打开服务器为其改名称。而且即便有幸雇佣了一名勤奋的管理员(他不介意每天做这样重复的事情),但他还是没办法更改文件中显示日期的属性,在这录制过程中已经决定了。除非 …….
2 :建立修改压码参数文件的任务
原理很简单:每天更新压码参数文件中与日期相关的 xml 字段。在这个例子里是文件显示日期的属性和文件名。 下面就是用于更新日期字段的脚本代码:
dim regOR
set regOR=new regexp ‘ 建立一个正则表达式对象
regOR.ignorecase=True ‘ 忽略大小写
regOR.global=True ‘ 搜索应用于整个字符串
regOR.pattern="^([0-9]{1})$" ‘ 建立搜索模式为单数字表达式
dim mytime
mytime=date ‘ 用 date 函数达到系统日期,并赋值给 mydate
yy=year(mytime) ‘ 提取系统日期中的年份
mm=month(mytime) ‘ 提取系统日期中的月份
dd=day(mytime) ‘ 提取系统日期中的日期
if regOR.test(mm) then ‘ 检测月份是否为单数字(一月到九月)
mm=regOR.replace(mm,"0$1") ‘ 如果是,则在月份前添加 0 使其成为两个数字
end if
if regOR.test(dd) then ‘ 检测日期是否为单数字(一日到九日)
dd=regOR.replace(dd,"0$1") ‘ 如果是,则在日期前添加 0 使其成为两个数字
end if
mytime=yy & "-" & mm & "-" & dd ‘ 合并年月日为 ”yy-mm-dd” 形式
dest=yy & mm & dd ‘ 合并年月日为 ”yymmdd” 形式
pattern1="(.*[^0-9])([0-9]{4}\-[0-9]{2}\-[0-9]{2})([^0-9].*)"
‘ 设定模式变量 pattern1 为 ”%d%d%d %d- %d %d -%d %d”
pattern2="(.*[^0-9])([0-9]{8})([^0-9].*)" ‘ 设定模式变量 pattern2 为 8 个连续数字
regOR.pattern=pattern1 ‘ 建立搜索模式为 pattern1
dim tempstring
Set fso = CreateObject("Scripting.FileSystemObject") ‘ 建立系统文件对象
Set f = fso.CreateTextFile("d:\shixian\temp.txt", True) ‘ 新建名为 temp 的文本文件
Set fr = fso.GetFile("d:\shixian\shixian.rpjf") ‘ 得到编码参数文件 shixian.rpjf
Set ts = fr.OpenAsTextStream(1,-2) ‘ 将参数文件以只读文本形式打开
do until ts.AtEndOfStream ‘ 建立循环,直到参数文件读取完毕
tempstring=ts.readline ‘ 以行为单位读取参数文件
if regOR.test(tempstring) then ‘ 搜索改行参数是否存在日期字段
tempstring=regOR.replace(tempstring,"$1" & mytim
现在电视台基本上都有了自己的门户网站,我们可以充分利用网络的优势来扩大本地电视台的影响。事实上,将本地电视台的每日的王牌节目挂在网站上的做法已经成为建立电视台网站的必要组成步骤之一了。但随之而来的问题是:每天定时需要的手工录制过程,将给管理者带来极大的不便。在 windows 定时任务的基础上,将批处理程序与脚本程序有机的集合,就可以有效地解决这一问题。
1 :建立压码任务
我们将使用一台带有视频采集卡的电脑来完成压码过程。虽然压码不是本文的重点,但还是有必要交代一下。主要就是使用 helix producer plus9 建立一个压码参数文件,事实上它只是一个带有 rpjf 后缀的 xml 文件(图 1 )。需要注意的是,音频输入选项有线路输入与 microphone 输入两种,这需要与实际的接入线路相吻合;另外,不必选择 2 pass vedio encoding 选项,选择它除了显示一个 warning 外不会有任何效果;再者,因为现阶段绝大多数的网络接入模式为拨号和 dsl ,所以只需要生成 56k 和 384k 码率的视频文件;最后,录制完成的视频文件,其名称最好用日期来标识,比如: 20060301.rm 。
<?xml version="1.0" encoding="UTF-8"?>
<job xmlns="http://ns.real.com/tools/job.1.0.1">
<enableTwoPass type="bool">false</enableTwoPass>
<clipInfo>
<entry>
<name>Author</name>
<value type="string">ZSTV</value>
</entry>
<entry>
<name>Copyright</name>
<value type="string">(c) ZSTV2006 </value>
</entry>
<entry>
<name>Keywords</name>
<value type="string">ZSNews[2006-03-21]</value>
</entry>
<entry>
<name>Title</name>
<value type="string">ZSNews[2006-03-21]</value>
</entry>
</clipInfo>
<input>
<captureInput>
<audioDeviceID type="string">Intel(r) Integrated Audio</audioDeviceID>
....................................
我们可以建立一个名为 shixian.bat 的批处理文件来的调用上面所示的参数文件,内部具体如下:
producer -j "d:\shixian\shixian.rpjf" -daw -lc "e,i"
默认的录制过程会实时监控音频变化,并将它记录到一个叫 producer.log 的文件之中,但是产生的 wanging 记录很多,很快就使 log 文件变得巨大而且可能引起录制过程的意外中断,所以我们可以使用 -daw 参数关闭音频监视,再用 lc “e,i” 指明只记录错误和信息。这样做之后,录制过程就比较稳定了。
只要在计划中添加每日执行 shixian.bat 文件的任务,我们就会每天得到一个相同文件属性和名称的 rm 文件。在这里将每天产生一个带有 2006-03-21 属性的、名为 20060321.rm 文件。听起来很拗口,更糟糕的是这并没有减轻管理者的工作,因为他不得不每天打开服务器为其改名称。而且即便有幸雇佣了一名勤奋的管理员(他不介意每天做这样重复的事情),但他还是没办法更改文件中显示日期的属性,在这录制过程中已经决定了。除非 …….
2 :建立修改压码参数文件的任务
原理很简单:每天更新压码参数文件中与日期相关的 xml 字段。在这个例子里是文件显示日期的属性和文件名。 下面就是用于更新日期字段的脚本代码:
dim regOR
set regOR=new regexp ‘ 建立一个正则表达式对象
regOR.ignorecase=True ‘ 忽略大小写
regOR.global=True ‘ 搜索应用于整个字符串
regOR.pattern="^([0-9]{1})$" ‘ 建立搜索模式为单数字表达式
dim mytime
mytime=date ‘ 用 date 函数达到系统日期,并赋值给 mydate
yy=year(mytime) ‘ 提取系统日期中的年份
mm=month(mytime) ‘ 提取系统日期中的月份
dd=day(mytime) ‘ 提取系统日期中的日期
if regOR.test(mm) then ‘ 检测月份是否为单数字(一月到九月)
mm=regOR.replace(mm,"0$1") ‘ 如果是,则在月份前添加 0 使其成为两个数字
end if
if regOR.test(dd) then ‘ 检测日期是否为单数字(一日到九日)
dd=regOR.replace(dd,"0$1") ‘ 如果是,则在日期前添加 0 使其成为两个数字
end if
mytime=yy & "-" & mm & "-" & dd ‘ 合并年月日为 ”yy-mm-dd” 形式
dest=yy & mm & dd ‘ 合并年月日为 ”yymmdd” 形式
pattern1="(.*[^0-9])([0-9]{4}\-[0-9]{2}\-[0-9]{2})([^0-9].*)"
‘ 设定模式变量 pattern1 为 ”%d%d%d %d- %d %d -%d %d”
pattern2="(.*[^0-9])([0-9]{8})([^0-9].*)" ‘ 设定模式变量 pattern2 为 8 个连续数字
regOR.pattern=pattern1 ‘ 建立搜索模式为 pattern1
dim tempstring
Set fso = CreateObject("Scripting.FileSystemObject") ‘ 建立系统文件对象
Set f = fso.CreateTextFile("d:\shixian\temp.txt", True) ‘ 新建名为 temp 的文本文件
Set fr = fso.GetFile("d:\shixian\shixian.rpjf") ‘ 得到编码参数文件 shixian.rpjf
Set ts = fr.OpenAsTextStream(1,-2) ‘ 将参数文件以只读文本形式打开
do until ts.AtEndOfStream ‘ 建立循环,直到参数文件读取完毕
tempstring=ts.readline ‘ 以行为单位读取参数文件
if regOR.test(tempstring) then ‘ 搜索改行参数是否存在日期字段
tempstring=regOR.replace(tempstring,"$1" & mytim