Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

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
GELÖST

Systemsprache ermitteln

Frage Entwicklung VB for Applications

Mitglied: 0cool

0cool (Level 2) - Jetzt verbinden

25.10.2007, aktualisiert 21:28 Uhr, 10422 Aufrufe, 3 Kommentare

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

language = "49"
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
Mitglied: bastla
25.10.2007 um 20:36 Uhr
Hallo 0cool!

Das könnte etwa so aussehen:
01.
strComputer = "."  
02.
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")  
03.
Set colItems = objWMIService.ExecQuery( _ 
04.
    "SELECT * FROM Win32_OperatingSystem",,48)  
05.
For Each objItem in colItems  
06.
    sCountryCode = objItem.CountryCode 
07.
Next 
08.
 
09.
language = "49" 
10.
If sCountryCode = language Then 
11.
    MsgBox "deutsch" 
12.
Else 
13.
    MsgBox "falsch" 
14.
End If
Grüße
bastla
Bitte warten ..
Mitglied: 0cool
25.10.2007 um 21:05 Uhr
@bastla: es funktioniert danke.
Da ich sehr lernfreudig bin und gerne weiss was in meinem code drin steht, wäre es net wenn du mir
ein kurze erklärung zu deinem script schickst das ich da auch durchsteige.

Danke

0cool
Bitte warten ..
Mitglied: bastla
25.10.2007 um 21:28 Uhr
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
Bitte warten ..
Ähnliche Inhalte
Windows 10
Systemsprache ändern Windows 10 (1)

Frage von Belloci zum Thema Windows 10 ...

Microsoft Office
gelöst VBA - aktuelle Kalenderwoche ermitteln (3)

Frage von Ghost108 zum Thema Microsoft Office ...

Visual Studio
gelöst SIDs eines Verzeichnisses ermitteln (1)

Frage von joehuaba zum Thema Visual Studio ...

Festplatten, SSD, Raid
Speicherverbrauch ermitteln (8)

Frage von Yannosch zum Thema Festplatten, SSD, Raid ...

Neue Wissensbeiträge
Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(1)

Information von DerWoWusste zum Thema Microsoft ...

Humor (lol)

Wohnt jemand in Belgien und kann nicht mehr ruhig ausschlafen?

(5)

Information von LordGurke zum Thema Humor (lol) ...

Sicherheits-Tools

Trendmicro OSCE und das Fall Creators Update Win10 RS3

(3)

Information von Henere zum Thema Sicherheits-Tools ...

Heiß diskutierte Inhalte
Hosting & Housing
Mailserver Software Empfehlungen (21)

Frage von sunics zum Thema Hosting & Housing ...

Voice over IP
DeutschlandLAN IP Voice Data M Premium, Erfahrung mit Faxgeräte? (16)

Frage von liquidbase zum Thema Voice over IP ...

TK-Netze & Geräte
TK-Anlage VoIP - DECT Erweiterung (15)

Frage von Lynkon zum Thema TK-Netze & Geräte ...