webForumDet fria alternativet

Kontrollera operativsystem med VBA

.NETur .NET

5 svar · 1 095 visningar · startad av Choronzon

Medlem sedan aug. 20011 346 inlägg
Frågan#1

Jag måste göra en kontroll vilket OS som körs och vill skapa en viss händelse då Windows 7 är operativsystemet. Hur kontrollerar jag detta mha VBA i Excel?

Medlem sedan feb. 200112 078 inlägg
#2

Jag har inte Excel så jag kan testa, och jag är osäker på exakt vad VBA klarar, men i VBScript kan det se ut ungefär såhär (med WMI):

set wmi= GetObject("winmgmts:\\.\root\cimv2")        
set w32os= objWMIService.ExecQuery("SELECT * FROM Win32_OperatingSystem")

For Each obj in w32os
   msgbox obj.Caption & " " & obj.Version
Next
Medlem sedan aug. 20011 346 inlägg
#3

Ok, tror inte det där fungerar i excel, står mer här http://accesstips.wordpress.com/2009/05/27/get-operating-system-information-using-microsoft-access-vba-and-wmi/ tänkte om det fanns i kernel32 eller liknande..

Medlem sedan juni 20014 421 inlägg
#4

Du ska kunna fråga WMI från VBA.

Däremot kan du kanske behöva dima variablerna med rätt typ:

Dim wmi As Object
Dim w32os As Object
Dim obj As Object
Medlem sedan aug. 20011 346 inlägg
#5

Ok, ja det är inte så väldigt aktuellt längre. Jag trodde att jag råkat på något som inte hade stöd i Windows 7, men så var det inte visade det sig. Tack ändå

Medlem sedan jan. 201017 inlägg
#6

Om nån fortfarande är intresserad så kanske denna länk hjälper till...
http://www.mvps.org/access/api/api0055.htm

136 ms totalt · 3 externa anrop · v20260731065814-full.25f56b17
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
133 ms — hämta tråd, inlägg och bilagor (db)