El problema de los ordinales es que no son estaticos ... y claro, no sabemos cuando cambian... Asi que bien, se puede hacer la comprobacion que tu haces, pero para bien tendriamos que tener una buena lista de ordinales, ya que posiblemente tambien varien en las versiones para servidores y esas cosas....
Una formas mas bonita de sacar el MajorVersion:
Sin estructuras ni leches
Date cuenta que el MajorVersion para XP es el mismo que para W$2000 y W$2003... asi que hay que filtrar con mas detalle...
Saludos
Una formas mas bonita de sacar el MajorVersion:
Código (vb) [Seleccionar]
'KERNEL32
Private Declare Function GetVersion Lib "KERNEL32" () As Long
Sub Main()
MsgBox (GetVersion And &HFF)
End Sub
Sin estructuras ni leches
Date cuenta que el MajorVersion para XP es el mismo que para W$2000 y W$2003... asi que hay que filtrar con mas detalle...
Código [Seleccionar]
http://msdn.microsoft.com/en-us/library/ms724832(v=VS.85).aspx
Saludos