Jump to content

VBScript to check file language?


Recommended Posts


This script will list the langauge of the OS like this English - United States

I stopped it at 1040, here is a link to the rest of the values, look for the OSLangauge section


Set Wmi = GetObject("winmgmts:\\.\root\CIMV2")
Dim L1, Obj
L1 = "Langauge : "
For Each Obj In Wmi.ExecQuery( "SELECT * FROM Win32_OperatingSystem")
Select Case Obj.OSLanguage
Case 1 L1 = L1 & "Arabic"
Case 4 L1 = L1 & "Chinese (Simplified) - China"
Case 9 L1 = L1 & "English"
Case 1025 L1 = L1 & "Arabic - Saudi Arabia"
Case 1026 L1 = L1 & "Bulgarian"
Case 1027 L1 = L1 & "Catalan"
Case 1028 L1 = L1 & "Chinese (Traditional) - Taiwan"
Case 1029 L1 = L1 & "Czech"
Case 1030 L1 = L1 & "Danish"
Case 1031 L1 = L1 & "German - Germany"
Case 1032 L1 = L1 & "Greek"
Case 1033 L1 = L1 & "English - United States"
Case 1034 L1 = L1 & "Spanish - Traditional Sort"
Case 1035 L1 = L1 & "Finnish"
Case 1036 L1 = L1 & "French - France"
Case 1037 L1 = L1 & "Hebrew"
Case 1038 L1 = L1 & "Hungarian"
Case 1039 L1 = L1 & "Icelandic"
Case 1040 L1 = L1 & "Italian - Italy"
End Select
Next
Wscript.Echo L1

Link to comment
Share on other sites

Actually I'd like to be able to check language of individual files, not the entire system language.

If you use filever.exe on a file, ex.

filever kernel32.dll

then it will display (among all other information) its language code like "ENU" for English or "PLK" for Polish, etc.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...