Systemsprache ermitteln
Hey Leute,
ich hab mal wieder ein problem. Das wäre ich wil mit einem vba script die sprache des systems auslesen und damit arbeiten
also Beispiel
Wenn du deutsch bist dann mach im script weiter
wenn du aber nicht deutsch bist dann dann beende das script
Das Script ist ein VBA Script und läuft auf WIN XP Pro
mein ansatz war folgender
Die Message Boxen sind nur zum testen ob es geklappt hat
Danke für eure Hilfe
0cool
ich hab mal wieder ein problem. Das wäre ich wil mit einem vba script die sprache des systems auslesen und damit arbeiten
also Beispiel
Wenn du deutsch bist dann mach im script weiter
wenn du aber nicht deutsch bist dann dann beende das script
Das Script ist ein VBA Script und läuft auf WIN XP Pro
mein ansatz war folgender
language = "49"
If item.Countrycode (language) Then
MsgBox "deutsch"
Else
MsgBox "falsch"
End If
If item.Countrycode (language) Then
MsgBox "deutsch"
Else
MsgBox "falsch"
End If
Die Message Boxen sind nur zum testen ob es geklappt hat
Danke für eure Hilfe
0cool
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 71943
Url: https://administrator.de/forum/systemsprache-ermitteln-71943.html
Ausgedruckt am: 19.04.2025 um 04:04 Uhr
3 Kommentare
Neuester Kommentar
Hallo 0cool!
Das könnte etwa so aussehen:
Grüße
bastla
Das könnte etwa so aussehen:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_OperatingSystem",,48)
For Each objItem in colItems
sCountryCode = objItem.CountryCode
Next
language = "49"
If sCountryCode = language Then
MsgBox "deutsch"
Else
MsgBox "falsch"
End If
Grüße
bastla
Hallo 0cool!
Eigentlich ist das nur eine simple WMI-Abfrage der "Win32_OperatingSystem"-Klasse unter Verwendung von MS-Beispielcode (wie für andere Eigenschaften dieser Klasse etwa hier gezeigt).
Grüße
bastla
Eigentlich ist das nur eine simple WMI-Abfrage der "Win32_OperatingSystem"-Klasse unter Verwendung von MS-Beispielcode (wie für andere Eigenschaften dieser Klasse etwa hier gezeigt).
Grüße
bastla