[技术讨论] 最近在学vbscripts，贡献一段CRT代码

# $language = "VBScript"
# $interface = "1.0"

crt.Screen.Synchronous = True

Sub Main
    Set SConfig = crt.GetScriptTab.Session.Config
    SConfig.SetOption "Output Transformer Name", "GB18030"
        SConfig.Save
End Sub
复制代码

# $language = "VBScript"
# $interface = "1.0"

crt.Screen.Synchronous = True

Sub Main
    Set SConfig = crt.GetScriptTab.Session.Config
    SConfig.SetOption "Output Transformer Name", "UTF-8"

SConfig.Save
End Sub
复制代码