保护模式.vbs

最新推荐文章于 2025-06-03 10:25:12 发布

转载最新推荐文章于 2025-06-03 10:25:12 发布 · 51 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/classics/p/9747154.html

本文分享了一段VBScript脚本，用于自动化配置光节点的接收器和工作模式，包括组合模式、强制通道模式和首选通道模式。脚本通过循环发送配置命令并设置延迟，确保每个操作都能正确执行。

Sub Main
Dim cnt
Dim delay
delay = 10000
For cnt = 0 To 80
crt.screen.Send "interface optical-receiver 0 " & chr(13)
crt.Sleep delay
crt.screen.Send "optical workmode combiner " & chr(13)
crt.Sleep delay
crt.screen.Send "optical workmode force-channel0 " & chr(13)
crt.Sleep delay
crt.screen.Send "optical workmode force-channel1 " & chr(13)
crt.Sleep delay
crt.screen.Send "optical workmode prefer-channel0 " & chr(13)
crt.Sleep delay
crt.screen.Send "optical workmode prefer-channel1 " & chr(13)
crt.Sleep delay
crt.screen.Send "quit " & chr(13)
crt.Sleep delay
crt.screen.Send "display optical-node 0 " & chr(13)
crt.Sleep delay
Next
End Sub