VB - registro Windows: dove sono? (98, 2000, XP,...)

[wdb]

Salve a tutti.

Ho bisogno di sapere, con uno script VBS o altro che acceda al
registro di Windows, quale versione di Windows sta girando sul PC.
Mi spiego meglio: nel registro di Windows esiste una informazione
standard (ossia uguale per tutti i Sistemi Operativi) che mi dica con
certezza se il Sitema Operativo attivo e' Windows 98 piuttosto che
Windows XP?

Nel registro di Win XP, ad esempio, c'e' la variabile di sistema OS
che e' settata = a "Windows_NT" e si trova alla voce
"[HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Se ssion
Manager\Environment\OS]".

In Win 98 questa variabile non esiste.

Qualcuno sa cosa posso cercare nel registro di Windows?

Grazie
Wdb

[Gugu]

Mi è già capitato..
Io ho fatto così:

VersioneOS = GetRegistryValue(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows\CurrentVersion", "ProductName")
If VersioneOS = "" Then
   VersioneOS = GetRegistryValue(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows NT\CurrentVersion", "ProductName")
End If

Non credo ci sia una chiave che vada bene per tutti i SO.

Sono sicuro che così copri:
95/98/2000/2000 SERVER/ME/XP

Ciao
Andrea

[wdb]

Il tuo sistema mi piace piu' del mio :adhone:

Io avevo fatto prima un test sull'esistenza della seguente chiave:

[HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Session Manager\Environment\OS]

per accertare se era tipo Windows_NT.
In caso di non esistente cercavo allora in:

[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Version]

che mi poteva ritornare, ad esempio, il valore di "Windows 98"

Grazie
Wdb