Visual Basic

Dim psi As New System.Diagnostics.ProcessStartInfo("ipconfig", "/all")
psi.UseShellExecute = False
psi.RedirectStandardOutput = True

Dim myprocess As New Process
myprocess.StartInfo = psi
myprocess.Start()

Dim myStreamReader As StreamReader = myprocess.StandardOutput
Dim myStreamWriter As New StreamWriter("c:\test.txt")
myStreamWriter.WriteLine(myStreamReader.ReadToEnd())
myprocess.WaitForExit()
myprocess.Close()
myStreamWriter.Close()
myStreamReader.Close()

Private Sub ValidateUserEntry()<br />
<br />
    ' Checks the value of the text.<br />
<br />
    If ServerName.Text.Length = 0 Then<br />
<br />
        ' Initializes variables to pass to the MessageBox.Show method.<br />
<br />
        Dim Message As String = "You did not enter a server name. Cancel this operation?"<br />
        Dim Caption As String = "No Server Name Specified"<br />
        Dim Buttons As MessageBoxButtons = MessageBoxButtons.YesNo<br />
<br />
        Dim Result As DialogResult<br />
<br />
        'Displays the MessageBox<br />
<br />
        Result = MessageBox.Show(Me, Message, Caption, Buttons)<br />
<br />
        ' Gets the result of the MessageBox display.<br />
<br />
        If Result = DialogResult.Yes Then<br />
<br />
            ' Closes the parent form.<br />
<br />
            Me.Close()<br />
<br />
        End If<br />
<br />
    End If<br />
<br />
End Sub