Nein, da mu� ich wiedersprechen. WMI ist in diesem Fall das falsche Tool.
Es w�rde funktionieren, da du aber �ber Win32_InstalledSoftwareElement gehen m��test und dort noch wesentlich mehr zu finden ist w�re WMI gegen�ber einer direkten Registrysearch um mindestens das 10-fache langsamer. Gruss Peter > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of Hubert Daubmeier > Sent: Monday, January 12, 2004 4:13 PM > To: [EMAIL PROTECTED] > Subject: RE: [Coffeehouse] Speicherort einer ActiveX.dll finden > > > > weiss jemand, wie ich �ber den Namen einer registrierten > ActiveX-dll > > deren > Speicherort finde? > > WMI sollte hier weiterhelfen. Hier mal ein Test-Script von > Scriptomatic - als .VBS speichern und ausprobieren. Wenn es > nichts hilft: hol Dir doch den Scriptomat selbst von ms.com > - so zirka http://www.microsoft.com/scripting/ > > > On Error Resume Next > strComputer = "." > Set objWMIService = GetObject("winmgmts:\\" & strComputer & > "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select > * from Win32_Service",,48) For Each objItem in colItems > Wscript.Echo "AcceptPause: " & objItem.AcceptPause > Wscript.Echo "AcceptStop: " & objItem.AcceptStop > Wscript.Echo "Caption: " & objItem.Caption > Wscript.Echo "CheckPoint: " & objItem.CheckPoint > Wscript.Echo "CreationClassName: " & objItem.CreationClassName > Wscript.Echo "Description: " & objItem.Description > Wscript.Echo "DesktopInteract: " & objItem.DesktopInteract > Wscript.Echo "DisplayName: " & objItem.DisplayName > Wscript.Echo "ErrorControl: " & objItem.ErrorControl > Wscript.Echo "ExitCode: " & objItem.ExitCode > Wscript.Echo "InstallDate: " & objItem.InstallDate > Wscript.Echo "Name: " & objItem.Name > Wscript.Echo "PathName: " & objItem.PathName > Wscript.Echo "ProcessId: " & objItem.ProcessId > Wscript.Echo "ServiceSpecificExitCode: " & > objItem.ServiceSpecificExitCode > Wscript.Echo "ServiceType: " & objItem.ServiceType > Wscript.Echo "Started: " & objItem.Started > Wscript.Echo "StartMode: " & objItem.StartMode > Wscript.Echo "StartName: " & objItem.StartName > Wscript.Echo "State: " & objItem.State > Wscript.Echo "Status: " & objItem.Status > Wscript.Echo "SystemCreationClassName: " & > objItem.SystemCreationClassName > Wscript.Echo "SystemName: " & objItem.SystemName > Wscript.Echo "TagId: " & objItem.TagId > Wscript.Echo "WaitHint: " & objItem.WaitHint Next > > > -- > > Best Regards > Hubert > > > _______________________________________________ > Coffeehouse mailing list > [EMAIL PROTECTED] > http://www.glengamoi.com/mailman/listinfo/coffeehouse > _______________________________________________ Coffeehouse mailing list [EMAIL PROTECTED] http://www.glengamoi.com/mailman/listinfo/coffeehouse
