使用VBScript或CMD在Windows中获取PPP VPN的服务器IP

是否可以在Windows下使用VBScript或命令行获取PPP VPN的服务器IP

---

注意，这不是VPN拨号服务器IP。

您可以使用VBScript从WMI获取信息。有很多网络脚本。
例如，使用以下脚本获取给定网络适配器的IP。请确保提供您的VPN名称，而不是“局域网连接2”字符串：

---

谢谢，但是图像中显示的服务器IP是动态分配的，看起来无法从WMI检索。此代码检索当前IP，如“动态分配”中所示。你试过了吗？如果它不起作用，您可以尝试使用其他几种WMI类-请参阅文章。@Traveling Tech Guy，是的，您的脚本获得了客户端IP，但没有服务器IP。

strComputer = "."
Set objWMIService = GetObject(_
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery _
    ("Select * From Win32_NetworkAdapter " _
        & "Where NetConnectionID = " & _
        "'Local Area Connection 2'")

For Each objItem in colItems
    strMACAddress = objItem.MACAddress
Next

Set colItems = objWMIService.ExecQuery _
    ("Select * From Win32_NetworkAdapterConfiguration")

For Each objItem in colItems
    If objItem.MACAddress = strMACAddress Then
        For Each strIPAddress in objItem.IPAddress
            Wscript.Echo "IP Address: " &  strIPAddress
        Next
    End If
Next