在工作了一天后,到第二天上班的时候,前一天连接的服务会断开,因为公司内部网络自动断开了,所以一个个重新连接和登录 ,用脚本轻松搞定。

# $language = "VBScript"
# $interface = "1.0"
Dim g_objTab
Set g_objTab = crt.GetScriptTab
Dim nIndex
For nIndex = 1 to crt.GetTabCount
Set objCurrentTab = crt.GetTab(nIndex)
objCurrentTab.Activate
' Skip tabs that aren't connected
If objCurrentTab.Session.Connected = False then
'connect the server
objCurrentTab.Session.Connect
crt.Sleep 800
If objCurrentTab.Session.Connected = True then
'use sudo su login
objCurrentTab.Screen.Send "sudo su" &vbcr
End IF
End If
Next
因为默认是普通用户进行的登录,所以登录后还需要用 sudo su 到超级用户才能正常工作,然后还可以在特定窗口切换到指定的代码目录下,完美。
文章描述了一个使用VBScript编写的脚本,用于自动化处理工作日结束后,公司内部网络自动断开时的重新连接和超级用户登录过程,确保第二天能顺利进入指定代码目录工作。
5021

被折叠的 条评论
为什么被折叠?



