.版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 调试输出 (网卡共享 (“本地连接”, “本地连接 2”, 假)) .子程序 网卡共享, 逻辑型 .参数 被共享的网卡名, 文本型 .参数 共享到网卡名, 文本型 .参数 是否开启共享, 逻辑型, 可空 .局部变量 是否开启, 文本型 .局部变量 对象操作, 对象 .局部变量 返回文本, 文本型 是否开启 ＝ 选择 (是否开启共享, “on”, “off”) 对象操作.创建 (“ScriptControl”, ) 对象操作.写属性 (“Language”, “VBScript”) 对象操作.方法 (“ExecuteStatement”, #常量vbs) 返回文本 ＝ 对象操作.通用方法 (“Run”, “Main”, 被共享的网卡名, 共享到网卡名, 是否开启).取文本 () .如果真 (对象操作.取错误 () ≠ “”) 返回 (假) .如果真结束 .如果真 (是否开启共享) 返回 (返回文本 ＝ “000”) .如果真结束 .如果真 (返回文本 ＝ “000”) 返回 (假) .如果真结束 返回 (真)