第二步: NetworkAddressChanged事件代码
Vars("网络状态") = TryConnectHost(www.jinyt.com) '数据库服务器地址
最好还要在AFTEROPENPROJECT项目事件写入这个代码,实验时发现上次Vars("网络状态")执行事件结果好像会保存着(比如是FALSE),假设这次IP地址没变化可以连接远程数据库,但在执行增加、删除记录什么,仍提示“对不起,当前网络或服务器不可用......"错误,在AFTEROPENPROJECT项目事件写入后,能正常打开项目,Vars("网络状态") = true,就不影响正常操作。