?灏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＆“音频文件没有正确下载!请检查更新!”鬃(作者单位：云南人民广播电台)

文章来源：《民族语文》 网址: http://www.mzywzz.cn/qikandaodu/2021/0307/388.html

上一篇：习近平总书记七一重要讲话民族文字版在陇川首
下一篇：翡翠三题