Vbscript для поиска имени версии Windows и пакета обновления

Какой самый простой способ узнать, какая версия Windows и какой пакет обновления работает на компьютере с VBScript ?

Например, я хотел бы знать Windows XP и Пакет обновления 3 .