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
Please also mark the comments that contributed to the solution of the article
Content-Key: 464822
Url: https://administrator.de/contentid/464822
Printed on: April 19, 2024 at 03:04 o'clock
2 Comments
Latest comment
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