Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

WMI KeyExists - Methode geht nicht?!?!

Frage Microsoft Windows Systemdateien

Mitglied: 45521

45521 (Level 1)

28.03.2007, aktualisiert 13:48 Uhr, 2858 Aufrufe, 1 Kommentar

Hi,

und zwar hatte ich eine VBScript-Funktion die die Existenz von Schlüsseln prüft. Die funktionierte auch schön und gut, war jedoch nicht in WMI geschrieben -> geht meiner Meinung dann auch nicht beim RemoteZugriff!?!?!

Naja, daraufhin habe ich dann versucht mir eine neue Funktion zusammen zu basteln, die das ganze in WMI testet (hab auch was hinbekommen, aber dabei trat komischerweise der gleiche Fehler auf, wie bei der, die ich dann ergooglet habe - habe dann die aus dem INet genommen, weil die wohl um einiges kürzer ist)

Hier die Funktion:

Function RegKeyExists(sHive, sRegKey)
Dim aValueNames, aValueTypes
If objReg.EnumValues(sHive, sKeyPath, aValueNames, aValueTypes) = 0 Then
RegKeyExists = True
Else
RegKeyExists = False
End If
End Function

Und hier deren Aufruf:

Set ObjReg = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")

Const HKEY_CURRENT_USER = &H80000001
RegPath = "Software\Microsoft\Windows NT\CurrentVersion\EFS\"

If RegKeyExists(HKEY_CURRENT_USER, regPath) Then
EFS = True
WScript.Echo "existiert nicht"
Else
EFS = False
WScript.Echo "existiert"
End If


Ich habe in meiner regEdit geschaut und da ist der Schlüssel definitiv nicht vorhanden und auch unter Verwendung eines Schlüssels wie 1234\2943\29420\ ist er immer in den True-Teil gesprungen. Auch, wenn ich mache IF NOT RegKeyExists springt er in den True-Zweig.

Kann mir jemand weiterhelfen?

Danke und Grüße,

Marc
Mitglied: 45521
28.03.2007 um 13:48 Uhr
Hab eine Funktion gefunden die (scheinbar) geht:

Function keyExists(strKeyName, strKeyPath, regCategory)
retVal = false
strComputer = "."


objReg.EnumKey regCategory, strKeyPath, arrSubKeys

For Each subkey In arrSubKeys
If strKeyName = subkey Then
retVal = true
Exit For
End If
Next
keyExists = retVal
End Function

Danke und Grüße,

Marc
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(1)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Windows Netzwerk
Windows 10 RDP geht nicht (18)

Frage von Fiasko zum Thema Windows Netzwerk ...

Windows Server
gelöst Active Directory CA öffentlich vertrauenswürdig machen, geht das? (2)

Frage von DeathangelCH zum Thema Windows Server ...

Windows Server
Windows Server 2008 R2 Aero-Design auf Remote Desktop geht nicht (3)

Frage von Motherboard33 zum Thema Windows Server ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

Outlook & Mail
Outlook 2010 findet ost datei nicht (18)

Frage von Floh21 zum Thema Outlook & Mail ...

Windows Server
Server 2008R2 startet nicht mehr (Bad Patch 0xa) (18)

Frage von Haures zum Thema Windows Server ...