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