在批处理文件中怎么样检测当前系统是WIN98还是WIN2000,请赐教,谢谢!因为我想执行此批处理文件后,可以自动地注册我地动态库!

解决方案 »

  1.   

    写一个程序,在批处理文件中执行,用它来检测并注册。'引用控件 Microsoft SysInfo Control 6.0
    Dim OS As StringWith SysInfo1
        Select Case .OSPlatform
            Case 0: OS = "Win32"
            Case 1:
                Select Case .OSVersion
                    Case 4: OS = "Win 95"
                    Case 4.1: OS = "Win 98"
                    Case 4.9: OS = "Wim Me"
                End Select
            Case 2:
                Select Case .OSVersion
                    Case 4: OS = "Win NT"
                    Case 5: OS = "Win 2000"
                    Case 6: OS = "Win XP"
                End Select
        End Select
        
        MsgBox "Build:" & .OSBuild & vbNewLine & _
            "Platform:" & OS & "(" & .OSPlatform & ")" & vbNewLine & _
            "Version:" & .OSVersion
    End With