<<< 返回 access911.net 编程静态资料库索引页 如何获取当前操作系统版本？ 作者： 摘自： 录入：cg1 时间：2002-12-8 浏览人次：418
专题地址：http://access911.net/index.asp?u1=a&u2=71FAB61E15DC 如果需要更详细的评论或说明，请点击该地址。 简述：
'建立模块输入以下代码
Option Compare Database Type OSVERSIONINFO
dwOSVersionInfoSize As Long
dwMajorVersion As Long
dwMinorVersion As Long
dwBuildNumber As Long
dwPlatformId As Long
szCSDVersion As String * 128 ' Maintenance string for PSS usage
End Type
Declare Function GetVersionEx Lib "kernel32" Alias "GetVersionExA" (lpVersionInformation As OSVERSIONINFO) As Long
Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
Public Const SM_CLEANBOOT = 67
Public Const SM_DEBUG = 22
Public Co.....................
........... |
| 
