2
VBS soll die Sprache der Windowsoberfläche auslesen
Hallo, ich versuche per VBS die Sprache der Windowsoberfläche auszulesen - was mache ich hier falsch?
Das Script gibt mir beide MsgBoxen raus
LG
language = WSHShell.RegRead ("HKEY_CURRENT_USER\Control Panel\Desktop\PreferredUILanguages")
if language = "de-DE" then MsgBox "deutsch "
if language <> "de-DE" then MsgBox "nicht deutsch " Das Script gibt mir beide MsgBoxen raus
LG
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 464822
Url: https://administrator.de/contentid/464822
Ausgedruckt am: 22.11.2024 um 11:11 Uhr
2 Kommentare
Neuester Kommentar
Servus,
Grüße Uwe
Das Script gibt mir beide MsgBoxen raus
der ausgelesene Wert ist vom Typ REG_MULTI_SZ und liefert ein Array aus Strings zurückSet WSHShell = CreateObject("Wscript.Shell")
languages = WSHShell.RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\PreferredUILanguages")
If LCase(languages(0)) = "de-de" then
MsgBox "deutsch"
Else
MsgBox "nicht deutsch: " & Join(languages,",")
End If
1
Funktioniert perfekt - Vielen Dank 
LG
LG
