2

我正在使用 cmd 使用 ipconfig > computer.txt 将用户网络规范打印到文本文件中。这方面的一个例子是

Windows IP Configuration


Wireless LAN adapter Wireless Network Connection:

   Connection-specific DNS Suffix  . : 
   Link-local IPv6 Address . . . . . : fe80::cd7a:50b3:1284:865%12
   IPv4 Address. . . . . . . . . . . : 10.0.0.26
   Subnet Mask . . . . . . . . . . . : 255.0.0.0
   Default Gateway . . . . . . . . . : 10.0.0.1

Ethernet adapter Local Area Connection:

   Connection-specific DNS Suffix  . : 
   Link-local IPv6 Address . . . . . : fe80::5c3a:ae77:81:8cdf%11
   IPv4 Address. . . . . . . . . . . : 10.0.0.25
   Subnet Mask . . . . . . . . . . . : 255.255.255.0
   IPv4 Address. . . . . . . . . . . : 192.168.1.12
   Subnet Mask . . . . . . . . . . . : 255.255.255.0
   Default Gateway . . . . . . . . . : 10.0.0.1

我将如何使用它来查找适配器默认网关之一（向下 x 行，然后：

不确定这是否是正确的做法。

如果没有，使用 vb.net 查找子网掩码/默认网关的最佳方法是什么

4

3 回答 3

1

如果格式始终相同String.IndexOf并且String.Substring是有效的方法：

Dim gateWays = From line In File.ReadLines("C:\Temp\data.txt")
               Skip 10
               Let gatewayIndex = line.IndexOf("Default Gateway . . . . . . . . . :")
               Where gatewayIndex > -1
               Select line.Substring(gatewayIndex + "Default Gateway . . . . . . . . . :".Length)
Dim firstGateWay = gateWays.FirstOrDefault

您可以使用Enumerable.Skip跳过 x 行，在此示例中为 10。

于 2012-07-11T21:33:07.140 回答
1

这应该做你想要的：

Private Function GetGateway(ByVal fileName As String) As String
    Dim sr As New System.IO.StreamReader(fileName)
    Dim foundEthernet As Boolean = False
    Dim gateway As String = ""

    Do Until sr.EndOfStream
        Dim line As String = sr.ReadLine()

        If line.Contains("Ethernet adapter LAN:") OrElse line.Contains("Ethernet adapter Local Area Connection:") Then
            foundEthernet = True
        End If

        If foundEthernet Then
            If line.Contains("Default Gateway . . . . . . . . . :") Then
                gateway = line.Substring(line.IndexOf(":") + 1).Trim
                Exit Do
            End If
        End If
    Loop
    sr.Close()

    Return gateway
End Function
于 2012-07-11T22:05:58.100 回答
0

此外，正如 mellamokb 所提到的，如果您在查询的 PC 上运行此应用程序，您可以使用

System.Net.NetworkInformation.NetworkInterface.GetAllNetworkInterfaces

获取此信息。

于 2012-07-11T22:35:48.147 回答