on error resume next 
'系統環境變數的陣列物件Environment("user")或Environment("system")
set sysenv = CreateObject("WScript.Shell").Environment("system") 
'如果是中文就切成英文，如果是英文就切成中文
If (sysenv("MAYA_UI_LANGUAGE") = "zh_CN") Then
	sysenv("MAYA_UI_LANGUAGE")="en_US" 
	msgbox "成功設定 MAYA 2013 為英文介面" ,, "MAYA 2013 語言切換" 
Else
	sysenv("MAYA_UI_LANGUAGE")="zh_CN" 
	msgbox "成功設定 MAYA 2013 為中文介面" ,, "MAYA 2013 語言切換" 
End If

Set sysenv = Nothing
WScript.Quit (0)