hsiung.博格 ERP軟體

在VFP 操作系統（ ） 功能 返回的名稱和版本號操作系統下，微軟 Visual FoxPro中 正在運行。

的值返回 操作系統（ ） 功能如下：
操作系統  返回值  評論

視窗95	視窗4.00
視窗98	視窗4.10
Windows 98 SE的	視窗4.10
視窗 ME	視窗4.90
的Windows NT 4.0	的Windows NT 4.00
視窗2000	的Windows 5.00或Windows NT 5.00	按照MSKB Q250512
Windows XP中	視窗5.01
Windows Server 2003中	視窗5.02
Windows Vista中	視窗6.00	操作系統（ 5） 返回“ 6000“
Windows Vista SP1的	視窗6.00	操作系統（ 5） 返回“ 6001 “及 操作系統（ 11） 返回“ 1“
Windows Vista SP2的	視窗6.00	操作系統（ 5） 返回“ 6002 “及 操作系統（ 11） 返回“ 1“
Windows Server 2008中	視窗6.00	操作系統（ 5） 返回“ 6001 “及 操作系統（ 11） 返回“ 2“或“3”
Windows Server 2008的R2的	視窗6.00	操作系統（ 5） 返回“ 6002 “及 操作系統（ 11） 返回“ 2“或“3”
視窗7	視窗6.01	操作系統（ 5） 返回“ 7100 “及 操作系統（ 11） 返回“ 1“

下面是一些有用的代碼：

LCOS = OS(1)
DO CASE
CASE "6.01" $ LCOS
   LCPLATFORM = "Windows7"
CASE "6.00" $ LCOS
   DO CASE
   CASE OS(5) = "6002"
      DO CASE
      CASE OS(11) = "1"
         LCPLATFORM = "VistaSP2"
      CASE INLIST(OS(11),"2","3")
         LCPLATFORM = "Win2008SP2"
      OTHERWISE
         LCPLATFORM = "(未知)"
      ENDCASE
   CASE OS(5) = "6001"
      DO CASE
      CASE OS(11) = "1"
         LCPLATFORM = "VistaSP1"
      CASE INLIST(OS(11),"2","3")
         LCPLATFORM = "Win2008"
      OTHERWISE
         LCPLATFORM = "(未知)"
      ENDCASE
   OTHERWISE
      LCPLATFORM = "(未知)"
   ENDCASE
CASE OS(5) = "6000"
   LCPLATFORM = "VISTA"
CASE "5.02" $ LCOS
   LCPLATFORM = "WIN2003"
CASE "5.01" $ LCOS
   LCPLATFORM = "WINXP"
CASE "5.0" $ LCOS
   LCPLATFORM = "WIN2000"
CASE "NT" $ LCOS
   LCPLATFORM = "WINNT"
CASE "4.0" $ LCOS OR "3.9" $ LCOS
   LCPLATFORM = "WIN95"
CASE "4.1" $ LCOS
   LCPLATFORM = "WIN98"
CASE "4.9" $ LCOS
   LCPLATFORM = "WINME"
CASE "3." $ LCOS
   LCPLATFORM = "WIN31"
OTHERWISE
   LCPLATFORM = "(未知)"
ENDCASE
? LCPLATFORM

除了 操作系統（ 1），有什麼一個需要做區分Win98和Win98的東南？ - 威廉場
你可以使用 操作系統（ 5） 獲取版本號。 - 謝爾蓋Berezniker
但是，這僅在VFP 7.0 + 。對於以前的版本見 獲取Windows版本 - 里克豆
還沒有機會測試還未註冊，但這裡的另一種可能性：如何：確定操作系統版本號- http://support.microsoft.com/?id=188987 - 威廉場。 獲取Windows版本 使用相同的Windows API，但更廣泛。