为了防止数据中断,为大家编写了一个监听数据是否正常传输的VBA 程序 - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

程序的主要判断条件是

获取指定品种的最后一笔数据的时间与当前的本地时间的时间差，然后与自己设置的时间差相对比（此时间差的设置是通过右上侧的

文本框填入设置的），当前者时间差大于后者时间差时，发出警报，有声音和消息提示。这样我们就可以及时知道数据中断,及时的切换到其他的服务器,保证我们的程序化正常稳定的运行

添加品种操作：

1.将时间差、品种代码、品种市场代码和备注（必须为正确的信息，否者提示错误，备注可以不填）填写完整。

2.单击添加品种按钮即可出现在左侧信息框中，开始监听。

删除品种操作：

1.找到欲删除的品种序号，填入品种序号右侧的文本框。

2.单击删除品种按钮即可删除。

导入历史品种品种操作：

在程序非正常关闭后，再次打开此程序，上次监听品种将丢失。

1.单击窗口右下侧导入历史品种按钮即可将还原上次监听品种。

停止监听品种操作：

此功能有两种操作方式，

第一种是停止监听一个指定的品种。1.找到欲停止监听的品种序号，填入品种序号右侧的文本框。

2.单击按钮即可停止监听。

第二种是停止监听所有的品种。 1.单击停止监听按钮，即可停止监听所有品种。

此功能说明：当有品种出现报警后，当数据传输回复正常后，报警停止。

而数据始终不回复正常，想要停止报警，可以使用此功能。

使用此功能后，当数据继续回复正常后，自动开始监听。

此程序自动在交易时间内监听信息框中的品种，窗口下方的两个开始监听按钮和停止监听按钮，作用不大。

此程序将保存的历史品种放在，金字塔根目录下\Document\import.ini 文件中。

此程序将保存的历史报警的所有错误信息，文件放在，金字塔根目录下\Document\record.ini 文件中。

报警声音文件应放在d盘根目录下，文件名为 a.wav.

注意:请合理设定所监控品种的时间差,对于国内期货至少要设定20秒,股票40秒.因为所监控品种的交易活跃度不同以及用户的网络传输延迟时间问题,如果此值设定太小会导致频繁的报警.

下载地址: http://www.weistock.com/download/alam.rar
导入方法:解压缩后,运行金字塔，点击“文件”菜单->导入，文件类型选窗体文件

导入UserForm2.frm窗体

将a.wav文件放到 D:\

关闭金字塔，重新启动

按Alt+F8弹出执行宏窗口，下拉菜单选择刚才我们导入的窗体即可运行了。

主题：为了防止数据中断,为大家编写了一个监听数据是否正常传输的VBA 程序