DETECTION DE L'OS

seth79 - 13 nov. 2001 à 10:04
VbMaster Messages postés 21 Date d'inscription mardi 26 novembre 2002 Statut Membre Dernière intervention 15 avril 2004 - 12 déc. 2003 à 19:35
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/64-detection-de-l-os

VbMaster Messages postés 21 Date d'inscription mardi 26 novembre 2002 Statut Membre Dernière intervention 15 avril 2004
12 déc. 2003 à 19:35
Pour savoir si on est sous 2000 ou XP :

Public Function IsWin2KXP() As Boolean
Dim oviInfo As OSVERSIONINFO
GetVersionEx oviInfo
If oviInfo.dwMajorVersion >= 5 And VER_PLATFORM_WIN32_NT Then
IsWin2KXP = True
End If
End Function

oviInfo.dwMajorVersion >= 5 :
en effet sous XP et 2000 ca retourne True, sous Millenium je sais pas.
cs_Cendra Messages postés 56 Date d'inscription mardi 27 août 2002 Statut Membre Dernière intervention 4 février 2008 1
3 sept. 2002 à 22:07
serai bien d'ajouter ME et XP ...

acidtoxik comment on fait pour determiner l'os par la base de registre ?
Fufroma Messages postés 1 Date d'inscription samedi 6 juillet 2002 Statut Membre Dernière intervention 6 juillet 2002
6 juil. 2002 à 16:03
et pour windows 2000 ????
en plus avec 2k y faut faire la diffférence entre pro, adv et srv !
acidtoxik Messages postés 28 Date d'inscription dimanche 12 mai 2002 Statut Membre Dernière intervention 2 janvier 2008
12 mai 2002 à 17:13
pas mal mais yavais plus simple t'allais lire dans la base de registre la version et pis voila !!!
Merci pour ce petit code bien pratique et qui m'a rendu un grand service tout en me faisant gagner du temps...

Bon courage :o)
Rejoignez-nous