Windows ve ofis sürümlerini aynı anda bulun

Windows işletim sistemi ve Office sürümü aynı komutla görebileceğiniz bir kodu bu yazımda bulabilirsiniz. Dilerseniz bu komut dosyasını kendiniz oluşturabileceğiniz gibi yazı sonundan linkten indirebilirsiniz.

Windows ofis surumlerini aynı anda bulun

Windows ve ofis sürümlerini aynı anda bulma için kullandımı:

Vbs (script) dosyasını çalıştırdığınızda karşınıza windows script host ekranı gelir. Bu ilk uyarı mesajında windows işletim sistemi sürümü gözükür. Bu ekranda tamama tıklamalısınız. Tıkladığınızda yine windows script hosts dosyası ekranı karşımıza gelir ve bu sefer ofis sürümü karşımıza gelir. Tamam deyip pencereyi kapatabilirsiniz.

Not: Ofis sürümünü görebilmek için windows sürümü ekranı gelince tamam butonuna tıkladığınızda ofis sürümünü göreçeksiniz.

Windows ve ofis sürümlerini aynı anda bulmak için vbs kodu:

strComputer = “.”
Set objWMIService = GetObject(“winmgmts:” _
& “{impersonationLevel=impersonate}!\\” & strComputer & “\root\cimv2”)

Set colOperatingSystems = objWMIService.ExecQuery _
(“Select * from Win32_OperatingSystem”)

For Each objOperatingSystem in colOperatingSystems
Wscript.Echo objOperatingSystem.Caption
Next

Set colSoft = objWMIService.ExecQuery(“SELECT * FROM Win32_Product WHERE Name Like ‘Microsoft Office%'”)

If colSoft.Count = 0 Then
wscript.echo “NO OFFFICE INSTALLED”
else
For Each objItem In colSoft
Wscript.echo objitem.caption & “, Version” & Left(objItem.Version, InStr(1,objItem.Version,”.”)-1)
exit for
Next
End If

Windows ve ofis sürümlerini aynı anda bulma indirme linki:

https://drive.google.com/file/d/0B4O615pMqW-kakhDQm1wYnN6ejQ/view

İndirme için chrome tarayıcıyı kullanın.

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir