当前位置: 网学 > 编程文档 > ASP > 正文

利用批处理文件和 vbs 脚本实现网站视频自动录制

来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 13/06/17
一样,还是要将这个 update.bat 的批处理文件添加到计划与任务中,以便每日定时启动。



3 :建立自动传输任务

为了确保稳定,通常压码服务器与网站服务器是分离的,这就需要我们每日将录制的视频文件传输到网站服务器上。批处理文件中的 ftp 命令可以完美的实现这一功能。

以下就是 transfer.bat 批处理中的代码:

@echo off

ftp -s:media.txt

if exist "d:\shixian\shixian20060321.rm" del d:\shixian\shixian20060321.rm

考虑到 SCSI 硬盘惊人的价格,压码服务器的硬盘空间不必太大,最后一行的作用就是删除压码服务器中的视频文件,以节省空间。 Media.txt 是一个 ftp 参数文件,其中记录了 ftp 登陆服务器的名称、用户名、密码和相关的操作,具体形式如下:

open / 服务器名称或 IP 地址 /

/ 用户名 /

/ 用户密码 /

put / 要传输的文件名 /

quit

很明显,以上的各段代码中不乏需要更新的日期文字表达式。同样的道理,我们也需要使用一个类似的更新脚本,具体代码就不重复了。



4 :一些改进的意见

1 :使用 media player 也可实现压码的功能。

2 :在更新脚本中,用在声明和注销对象上的代码有好几行,如果使用 perl 可以大为简化。因为是 perl 提供了一系列操作符号来实现正则表达式的功能,而事实上 perl 就是为了处理文本而生的。
open(RPJF,"<c:/code/10161.rpjf") or die("can not open because of $!\n");
open(TEMP,">c:/code/temp.txt") or die("can not open because of $!\n");
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime();
$mday=sprintf("%.2d",$mday);
$mon=sprintf("%.2d",$mon+1);
$year+=1900;
$timerF="$year"."$mon"."$mday";
$timerS="$year"."-"."$mon"."-"."$mday";
while(<RPJF>){
chomp();
利用批处理文件和 vbs 脚本实现网站视频自动录制_网学
浏览:
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
湘ICP备09003080号
=~s/(.*)([0-9]{8})(.*)/$1$timerF$3/;
利用批处理文件和 vbs 脚本实现网站视频自动录制_网学
浏览:
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
湘ICP备09003080号
=~s/(.*)([0-9]{4}\-[0-9]{2}\-[0-9]{2})(.*)/$1$timerS$3/;
print TEMP " 利用批处理文件和 vbs 脚本实现网站视频自动录制_网学
浏览:
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
湘ICP备09003080号
\n";
}
close(RPJF);
close(TEMP);
3 :使用磁盘映射能够更加方便的实现文件的传输,不过需要考虑安全问题。

  • 上一篇资讯: asp调用存储过程
  • 网学推荐

    免费论文

    原创论文

    浏览:
    设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
    版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
    湘ICP备09003080号