预报综合服务软件的开发

1 引言

社会不断发展进步，人们对天气形式的变化越来越关心，越来越重视。这样的背景下就需要市气象局向电台、电视台、报纸等各媒体天气预报，同时向省气象局上传电视报、手机短信等内容，其中大部分内容要求在特定的时段内完成，这不仅使得预报员的工作任务大大增加，也因工作时间太松散而容易导致错误的发生。这篇论文介绍的就是用易语言编写的预报综合服务软件，该软件主要是通过网络定时向省局和互联网上传各种规定时段内的发送任务。

2 易语言简介

易语言是一种自主开发，适合不同层次不同专业人员的易学易用的全中文的编程语言。易语言还是一个适合国情，支持汉字编程的、全可视化的、跨主流操作系统平台的编程工具软件。它能与常用的编程语言互相调用，具有充分利用API、COM、DLL、OCX组件，各种主流数据库，各种实用程序等多种资源的接口和支撑工具。易语言有自主开发的高质量编译器，中文源代码被直接编译为CPU指令，运行效率高，安全可信性高；拥有自己的数据库系统，且支持访问现有所有数据库。它综合采用了结构化、面向对象、组件、构架、集成化等多种先进技术，并在运行效率、性能价格比、全可视化支持等方面具有特色，对多媒体功能支持强大，有完善的网络、端口通讯和互联网功能支持。易语言的可视化设计操作不仅支持程序窗体界面，还可将流程图嵌入其中；模块化开发满足大型软件的设计要求；自带的易数据库能提供接口技术的全面支持，易语言是中国人自己的编程语言。

3 程序介绍

3.1 程序主界面及功能

此程序主要是用来在规定时段内自动发送各种预报结论，如定时向E-mail邮箱发送北方晨报、千山晚报；向省气象局上传电视报、手机短信等。主界面下显示是否有任务等待发送，如果有发送任务，则显示距离发送的时间及连接状态、回执情况等内容。

3.2 程序各模块介绍

3.2.1 电视报模块

该模块主要是编辑电视报并通过FTP远程登录省局服务器，按所设置的时间自动上传。窗口中显示电视报编辑框，根据不同时间自动加载不同的报头，预报员对电视报编辑完成后选择保存并选定时上传按钮，电视报就会在规定时间内上传到省局指定的路径下，其中时间和路径都在设置窗口中完成。另外，程序还可以提取最近一次发送电视报的内容及获取回执。

程序主要语句如下：

FTP远程登录：

如果 (连接FTP服务器 (省局FTP服务器, 省局FTP账号, 省局FTP密码, ,) ＝ 真) 连接电视报FTP状态透明标签.标题 ＝ “连接chenggong”

如果真 (读配置项 (“d:\gztx\tt.ini”, “工作任务”, “电视报上传”, ) ＝ “1”)

最后一次电视报路径 ＝ 读配置项 (“d:\gztx\tt.ini”, “电视报编辑框提取内容路径”, “最后一次电视报路径”, )

更改后的文件名 ＝ 电视报时间处理子程序 ()

连接电视报FTP状态透明标签.标题 ＝ “准备发送”

如果 (最后一次电视报路径 ＝ “d:\gztx\dsb\” ＋ 更改后的文件名)

如果 (FTP文件上传 (“d:\gztx\dsb\” ＋ 更改后的文件名, 读配置项 (“d:\gztx\tt.ini”, “上传路径设定”, “电视报上传路径”, ) ＋ 更改后的文件名, ))

断开FTP服务器 ()

电视报形成：

下午电视报时间差 ＝ 取小时 (取现行时间 ()) × 100 ＋ 取分钟 (取现行时间 ()) － 到整数 (读配置项 (“d:\gztx\tt.ini”, “时间设定”, “下午电视报发送时间设定”, ))

下午电视报距离时间 ＝ 到整数 (取文本左边 (读配置项 (“d:\gztx\tt.ini”, “时间设定”,“下午电视报发送时间设定”, ), 2)) × 60 ＋ 到整数 (取文本右边 (读配置项 (“d:\gztx\tt.ini”, “时间设定”, “下午电视报发送时间设定”, ), 2)) － 取小时 (取现行时间 ()) × 60 － 取分钟 (取现行时间 ())

3.2.2 短信平台模块

这个模块主要编辑发送鞍山小灵通、鞍山手机短信、海城手机短信、台安手机短信、岫岩手机短信等内容。预报员在各个编辑框中输入所要发送的预报内容，然后点击启动定时发送按钮，短信就会在规定时间内发送出去。另外，由于短信内容有字数限制，所以在编辑框后显示要求内剩余的字数，如果该项显示为0，就不能再输入了。程序主要语句如下：

写到文件 (“d:\gztx\下午小灵通.txt”, 到字节集 (鞍山小灵通内容编辑框.内容))

如果 (时间差 ≥ 0)

写配置项 (“d:\gztx\tt.ini”, “工作任务”, “鞍山小灵通”, “1”)

发送短信子程序 (“鞍山小灵通”)

写配置项 (“d:\gztx\tt.ini”, “工作任务”, “鞍山小灵通”, “1”)

鞍山小灵通内容保存按钮.标题 ＝ “已启动定时发送”

启动窗口.鞍山小灵通时间差显示透明标签.标题 =“距离小灵通发送时间还有：”+ 到文本 (距离时间)

3.2.3 电子邮件模块

此模块主要用来编辑并定时向邮箱发送北方晨报和千山晚报的电子邮件，如图1。以北方晨报为例，预报员选中编辑北方晨报按钮，编辑框中会显示上一次发送的预报内容，预报员可以在此基础上修改预报结论，然后选则保存启动定时发送按钮，预报就会以文本文件格式保存在本地磁盘指定位置并定时发送到指定邮箱。

主要语句如下：

如果 (连接发信服务器 (“网址”,21 , “邮箱”, “密码”, 60000) ＝ 真)

补发邮件按钮.标题 ＝ “连接成功”

如果 (发送邮件 (“鞍山气象”, 读入文本 (北方晨报文件号, ), 北方晨报收信人地址, , ,“”, ) ＝ “”)=“”表示发送成功

写配置项 (“d:\gztx\tt.ini”, “工作任务”, “北方晨报”, “0”)

北方晨报透明标签.标题 ＝ “北方晨报：已发送完毕”

关闭文件 (北方晨报文件号)

否则

北方晨报透明标签.标题 ＝ “北方晨报：发送失败，请手动重发”

关闭文件 (北方晨报文件号)

3.2.4 时间设置模块

该模块主要是设置上述提及的定时发送电视报、手机短信、电子邮件所需要设定的时间，如图2。预报员根据各种预报规定的上传时间在此设置。以小灵通短信为例，主要程序如下：

如果 (写配置项 (“d:\gztx\tt.ini”, “时间设定”,“下午小灵通发送时间设定”, 小灵通小时组合框.内容＋小灵通分钟组合框.内容))

小灵通时间设定按钮.标题 ＝ “修改完毕”

否则

小灵通时间设定按钮.标题 ＝ “修改失败”

3.2.5 路径设置模块

该模块主要是设置上述提及的电视报、手机短信、电子邮件所需要设定的上传路径。以电视报为例，主要程序如下：

(“d:\gztx\tt.ini”, “上传路径设定”,“省局FTP服务器”, )

(“d:\gztx\tt.ini”, “上传路径设定”, “省局FTP账号”, )

省局FTP密码编辑框.内容 ＝ 读配置项(“d:\gztx\tt.ini”, “上传路径设定”, “省局FTP密码”, )

4 结语

本文论及的程序，涉及了向省气象局上传电视报和手机短信及向互联网发送电子邮件等内容，这个程序能为预报员节省很多工作时间，并且很大程度上避免了预报的漏发。该软件已在工作中得到应用,非常稳定。