想要很詳細的 所有關聯代碼都帶著的
uj5u.com熱心網友回復:
VB.Net通過IP地址獲取Mac地址
Imports System
Imports System.Diagnostics
Public Class MacAddress
Public Function GetMac(ByVal IP As String) As String
Dim str1 As String = String.Empty
Try
Dim str2 As String = String.Empty
Dim info1 As ProcessStartInfo = New ProcessStartInfo()
Dim process1 As Process = New Process()
info1.FileName = "nbtstat"
info1.RedirectStandardInput = False
info1.RedirectStandardOutput = True
info1.Arguments = "-A " + IP
info1.UseShellExecute = False
process1 = Process.Start(info1)
Dim num1 As Integer = -1
While (num1 <= -1)
num1 = str2.Trim().ToLower().IndexOf("mac address", 0)
If (num1 > -1) Then
Exit While
End If
str2 = process1.StandardOutput.ReadLine()
process1.WaitForExit()
str1 = str2.Trim()
End While
Catch ex As Exception
Throw ex
End Try
Return str1
End Function
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/153331.html
標籤:API
上一篇:vb6 creatobject("excel.application") 自動化錯誤
下一篇:mshflexgrid在運行時設定了一個記錄集作為資料源之后,如何讓mshflexgrid顯示某些列而不顯示某些列?
