Click here to Skip to main content
Click here to Skip to main content

Remote Shutdown in VB.NET 2003 and C#.NET 2008

, 3 Jun 2010 CPOL
Rate this:
Please Sign up or sign in to vote.
Shutdown, reboot, and log-off your remote PCs.
Sample screenshot

Sample screenshot

Introduction

This application can be used to shutdown, reboot, and logoff remote PCs. Client application that is 'remoteClientX' must be installed on client PCs and 'ServerX' is used to give commands like shutdown, reboot and logoff.

Listen State Module of remoteClientX

Sub ListenToServer()
  Try
    Dim LISTENING As Boolean
    Dim localhostAddress As IPAddress = IPAddress.Parse(ipAddress.ToString)
    Dim port As Integer = 63000
    '' PORT ADDRESS
    ''''''''''' making socket tcpList 
    ''''''''''''''''
    Dim tcpList As New TcpListener(localhostAddress, port)
    Try
      tcpList.Start()
      LISTENING = True
      Do While LISTENING
        Do While tcpList.Pending = False And LISTENING = True
          ' Yield the CPU for a while.
          Thread.Sleep(10)
        Loop
        If Not LISTENING Then Exit Do

        Dim tcpCli As TcpClient = tcpList.AcceptTcpClient()
        Dim ns As NetworkStream = tcpCli.GetStream
        Dim sr As New StreamReader(ns)
        ''''''''' get data from server'''''''''''''''
        Dim receivedData As String = sr.ReadLine()
        If receivedData = "###SHUTDOWN###" Then
          trShutdown = New Thread(AddressOf shutdown)trShutdown.Start()
        End If
        If receivedData = "###REBOOT###" Then
          trReboot = New Thread(AddressOf reboot)trReboot.Start()
        End If
        If receivedData = "###LOGOFF###" Then
          trLogOff = New Thread(AddressOf logoff)trLogOff.Start()
        End If
        Dim returnedData As String = "###OK###" '& " From Server"
        Dim sw As New StreamWriter(ns)
        sw.WriteLine(returnedData)
        sw.Flush()
        sr.Close()
        sw.Close()
        ns.Close()
        tcpCli.Close()
      Loop
      tcpList.Stop()
    Catch ex As Exception
      'error
      LISTENING = False
    End Try
End Sub

Here port address is taken as 63000.

ServerX Shutdown Request Module

Sub SendMessage()
  Dim host As String = txtClientIP.Text
  Dim port As Integer = 63000
  Try
    Dim tcpCli As New TcpClient(host, port)
    Dim ns As NetworkStream = tcpCli.GetStream

    ' Send data to the client.
    Dim sw As New StreamWriter(ns)
    If rbShutdown.Checked = True Then
        sw.WriteLine("###SHUTDOWN###")
    End If

    If rbReboot.Checked = True Then
        sw.WriteLine("###REBOOT###")
    End If
    If rbLogOff.Checked = True Then
        sw.WriteLine("###LOGOFF###")
    End If
    If rbNothing.Checked = True Then
        sw.WriteLine("to")
    End If
    sw.Flush()
    ' Receive and display data.
    Dim sr As New StreamReader(ns)
    Dim result As String = sr.ReadLine()
    If result = "###OK###" Then
        MsgBox("Operation Performed!!!", MsgBoxStyle.Information, _
               "Accepted by client")
    End If

    sr.Close()
    sw.Close()
    ns.Close()
  Catch ex As Exception
    MsgBox(ex.Message)
  End Try
End Sub

Note: remoteClientX must be run on remote PCs & check the network IP address.

t = objComputer.Win32Shutdown(8 + 4, 0)

The above statement is used to shutdown the system. Here 8 is the code for shutdown and 4 is for Force that is 8+4 : force shutdown, same for reboot and logoff.

Force shutdown: 8+4
Force reboot    : 2+4
LogOff            : 0

Note: remoteClientX uses WMI that is Win32_OperatingSystem class for force shutdown, force reboot, logoff.

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Share

About the Author

Hari Om Prakash Sharma
Software Developer
India India
Developer
Follow on   Twitter

Comments and Discussions

 
Questionadd various ip Pinmembernaq_ninetwo9218-Oct-12 6:20 
AnswerRe: add various ip PinmemberHari Om Prakash Sharma5-Dec-12 18:29 
GeneralRe: add various ip Pinmembernaq_ninetwo924-Feb-13 15:34 
GeneralMy vote of 1 PinmemberАslam Iqbal10-Aug-12 18:46 
GeneralMy vote of 3 PinmemberVitaly Tomilov24-Jun-12 0:17 
GeneralArticle Viewer in C#.Net PinmemberMohammad Afrashteh9-Feb-11 13:36 
GeneralHelp needed Pinmemberservox4-Aug-10 13:13 
AnswerRe: Help needed PinmemberHari Om Prakash Sharma11-Aug-10 0:43 
GeneralSysinternal did this a long time ago.... Pinmembergiammin3-Jun-10 22:49 
GeneralRe: Sysinternal did this a long time ago.... PinmemberHari Om Prakash Sharma4-Jun-10 6:37 
Generalremote shutdown error Pinmemberalanz858-Apr-10 0:16 
GeneralRe: remote shutdown error PinmemberHari Om Prakash Sharma11-Apr-10 4:21 
Generalcode Pinmemberhappyankitsanghvi1-Jan-10 23:28 
AnswerRe: code PinmemberHari Om Prakash Sharma4-Jan-10 0:54 
Generalplease PinmemberMember 40574751-Oct-09 9:28 
QuestionRemote start up server Pinmemberkuniyo8-Jul-09 0:11 
AnswerRe: Remote start up server PinmemberHari Om Prakash Sharma26-Jul-09 20:30 
GeneralShutdown 1000 XP SP2 PCs Pinmemberneoice12-Dec-08 23:39 
GeneralRe: Shutdown 1000 XP SP2 PCs PinmemberHari Om Prakash Sharma26-Jul-09 20:36 
QuestionRemote data on com port Pinmemberfahadi8610-Dec-08 11:20 
AnswerRe: Remote data on com port PinmemberHari Om Prakash Sharma17-Dec-08 23:57 
Generalmayank Pinmemberrajnik2-Dec-08 2:11 
GeneralRe: mayank PinmemberHari Om Prakash Sharma15-Dec-08 19:48 
GeneralHI Hari Om PinmemberchandrikaC31-Aug-08 7:07 
AnswerRe: HI Hari Om PinmemberHari Om Prakash Sharma31-Aug-08 19:56 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

| Advertise | Privacy | Terms of Use | Mobile
Web01 | 2.8.141220.1 | Last Updated 3 Jun 2010
Article Copyright 2006 by Hari Om Prakash Sharma
Everything else Copyright © CodeProject, 1999-2014
Layout: fixed | fluid