vbs脚本多个条件分支if else 例子

好的，以下是一个简单的vbs脚本，它演示了多个条件分支的if else例子：

Dim x, y, z
x = InputBox("请输入x的值：")
y = InputBox("请输入y的值：")
z = InputBox("请输入z的值：")
If x > y Then
    If x > z Then
        MsgBox "x最大！"
    Else
        MsgBox "z最大！"
    End If
Else
    If y > z Then
        MsgBox "y最大！"
    Else
        MsgBox "z最大！"
    End If
End If

以上脚本演示了三个变量x、y、z之间的大小关系，通过多个条件分支的if else来判断最大值。请将上述代码保存为一个.vbs文件，双击运行即可。

相关问题

用vbs脚本写一个局域网扫描

我可以回答这个问题。您可以使用以下vbs脚本来扫描局域网：

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set IPConfigSet = objWMIService.ExecQuery _
    ("Select * from Win32_NetworkAdapterConfiguration Where IPEnabled = True")
 
For Each IPConfig in IPConfigSet
    If Not IsNull(IPConfig.IPAddress) Then
        For i=LBound(IPConfig.IPAddress) to UBound(IPConfig.IPAddress)
            strIP = IPConfig.IPAddress(i)
            If InStr(strIP, ".") >  Then
                strPrefix = Left(strIP, InStrRev(strIP, "."))
                For j=1 To 254
                    strTestIP = strPrefix & j
                    Set objPing = GetObject("winmgmts:{impersonationLevel=impersonate}").ExecQuery _
                        ("select * from Win32_PingStatus where address='" & strTestIP & "'")
                    For Each objStatus in objPing
                        If objStatus.StatusCode =  Then
                            WScript.Echo "IP Address: " & strTestIP & " is online."
                        End If
                    Next
                Next
            End If
        Next
    End If
Next

这个脚本将扫描您的局域网，并显示在线的IP地址。请注意，您需要以管理员身份运行此脚本。

请写一个Securecrt批量登录多台服务器的vbs脚本

以下是一个基本的 SecureCRT 批量登录多台服务器的 VBS 脚本。在使用之前，需要先在 SecureCRT 中创建一个会话文件，然后将会话文件名添加到“hosts”数组中。每个会话文件应该包含连接到远程服务器所需的所有信息，例如IP地址、端口号、用户名和密码等。

' SecureCRT VBScript - Batch login to multiple servers

Dim hosts(2)
hosts(0) = "session1"
hosts(1) = "session2"
hosts(2) = "session3"

Dim i
For i = 0 To UBound(hosts)
    crt.Session.Connect("/S " & hosts(i))
Next

在上面的脚本中，“/S”选项用于指定要连接的会话文件名。使用 UBound() 函数检索 hosts 数组的上限，并使用 For 循环遍历数组中的每个会话文件。然后，使用 crt.Session.Connect() 方法连接到每个会话文件中指定的服务器。

请注意，该脚本需要在 SecureCRT 中运行。要运行脚本，请打开 SecureCRT，然后选择“脚本”→“运行脚本”，选择脚本文件并点击“运行”按钮。