利用网络传输制作发射台自动化信号源系统
来源:民族语文
【在线投稿】
栏目:期刊导读 时间:2021-03-07
?灏i问‘叶零孽鋈? i…。? i一-曩一器粼≯毪爹嘲矽叼涉News gissemination利用网络传输制作发射台自动化信号源系统一、系统设计系统用到电台服务器和发射台终端电脑。服务器每天在FTP上的“民族语节目”文件夹中产生节目源MP3文件:1_试机乐.mp3、2一拉祜语节目.mp3、3一傈僳语节目.mp3、4-西傣语节目.mp3、5一德傣语节目.mp3、t景颇语节目. rap3、7一普通话节目.mp3。发射台终端电脑每天定时自动登陆ftp://www.XXXXXXX.eom,并自动下载MP3文件,保存路径为D:\民族语节目:同时程序定时检查文件是否已正确下载。发射台终端电脑每天定时与国家授时中心服务器210.72.145.44校时,并定时自动播放“D:\民族语节目”文件夹中的MP3文件作为发射机信号源。二、自动FTllP下载每天从FI'P上下载的文件除了MP3文件外,还有一个“date.txt”文本文件,里面有一个格式为“2007—1—1”的字符串.表示这些MP3文件的最后更新时间。1.在“D:\民族语节目”中建随意名称例如“mzyjm.txt”文本文档,写入如下命令: openWWW.XXXXXXX.com#登陆目标}$$料#用户名#${4#密码 cd民族语节目#进入指定路径 bin#使用二进制进行传输 ge¨一试机乐.rap3#下载指定文件 get2-拉祜语节目.mp3 get3一傈傈语节目.mp3 get4-西傣语节目.mp3 get5一德傣语节目.rap3 get6_景颇语节目.mp3 get7一普通话节目.mp3 get date.txt bye样退出程序2.在“D:\民族语节目”中建批处理文件“mzyjm.bat”,编辑下列内容:D: cd民族语节目何睿 tip—s:mzyjm.txt将该批处理程序添加到计划任务中,就可实现音频文件的自动下载。三、自动检查程序我们考虑到网络中断、电脑故障、人为误操作等情况造成的丌P自动下载失败,特意编写自动检查程序。在本系统里采用VB编写该自动检查程序:,1.建立窗体,窗体中放入三个控件:Labell;Commandl,名称为“立即手动下载”:Command2,名称为“确定”。2.编写代码:PrivateSubCommandl—Click0Dim x#点击Commandl, x=Shell(”D:\民族语节目hnzyjm_bat”)#启动FrP自动下载程序。EndSl】bPrivateSubCommand2一Click0End#点击Commandl,EndSub#关闭窗体。PrivateSubForm_Activate0Dim mydateAsString#定义变量Dim ddAsStringDim x dd=DateOpen”D:\民族语节目\date.txt’!ForInputAs#1#打开写有日期DoWhileNotEOF(11#数据的文本文档。LineInput#L mydate#读取日期,ⅡCDate(mydatel=ddThen}}与当前日期比较Labell.Caption=“更新日期为”&mydate&“音频文件已正确下载!”ElseLabell.Caption=“更新日期为”&mydate&“音频文件没有正确下载!请检查更新!”鬃(作者单位:云南人民广播电台)