Access数据库启动时检查服务器有否最新版,然后再做一个程序来自动更新
- 2017-09-16 09:14:00
- zstmtony 原创
- 7083
Access数据库启动时检查服务器有否最新版,然后再做一个程序来自动更新
思路:
1.按照以前讲的从服务器或从本地INI文件读取版本信息
2.对比版本信息,如发现有新版本
3.就提示是否更新新版本
4.如更新,则用程序打开另一个 更新专用的mde文件来更新
5.更新完成后可以考虑再打开主程序
主程序切换到更新程序的一些关键的代码:
MsgBox "客户管理软件检测到新版本,升级系统能够保证系统的稳定及能够使用新的功能!" & vbCrLf & "建议您马上升级,现在自动升级!", vbQuestion + vbYes, "天鸣电脑科技"
' If MsgBox("客户管理软件检测到新版本,升级系统能够保证系统的稳定及能够使用新的功能!" & vbCrLf & "建议您马上升级,现在自动升级!", vbQuestion + vbYes, "天鸣电脑科技") = vbYes Then
'taOpenMDB (CurrentProject.Path & "\AutoUpdate.mde")
Application.FollowHyperlink (CurrentProject.Path & "\AutoUpdate.mde"), , True
DoCmd.Close acForm, Me.Name
DoCmd.Quit acQuitSaveNone
' End If
End If
文章分类
联系我们
联系人: | 王先生 |
---|---|
Email: | 18449932@qq.com |
QQ: | 18449932 |
微博: | officecn01 |