nnmmshe 发表于 2017-7-29 18:05:58

66666666666666666666666666666666666

芝麻开门123 发表于 2017-7-29 23:30:28

多谢楼主

376408384 发表于 2017-7-29 23:44:50

发布 核心代码

dim objShell
dim CommandLine,UgPath
set objshell=createobject("wscript.shell")
UgPath=objShell.ExpandEnvironmentStrings("%UGII_BASE_DIR%")
UgPath=chr(34)&UgPath&"\UGII\ugraf.exe"&chr(34)
REM Wscript.echo UgPath
CommandLine="%comspec% /c set ugii_lang=english&set UGII_DISPLAY_DEBUG=1&set UGII_COUNTRY=prc&start "&chr(34)&chr(34)&chr(32)&UgPath&" -nx"
REM Wscript.echo CommandLine
objShell.run CommandLine,0,true
REM objShell.Run UgPath,,true
Set objShell=NoThing
WScript.quit

懒得编写exe

mengqinghe0909 发表于 2017-7-30 09:13:17

真是解决了燃眉之急啊

mengqinghe0909 发表于 2017-7-30 09:13:45

真是解决了燃眉之急啊

zh53469 发表于 2017-7-30 09:52:06

好好学习 天天向上

250760422 发表于 2017-7-30 10:46:32

学习学习

liu362421 发表于 2017-7-30 17:22:05

这么66666666666666666666666666666666

hwccbc* 发表于 2017-7-30 22:24:54

学习一下,谢谢楼主

Ascetic 发表于 2017-7-31 08:48:34

感谢大神233
页: 592 593 594 595 596 597 598 599 600 601 [602] 603 604 605 606 607 608 609 610 611
查看完整版本: UG一键设置多国语言工具,【中、英、德、法、意、日、韩等九国语言启动】