How to start and stop service from web page using vb.net

Imports System.ServiceProcess

Public Sub StopService(ByVal myServiceName As String)

    Dim DataSource As String = txtServer.Text
    Dim sStatus As String
    Dim myController As ServiceController

    myController = New ServiceController
    myController.MachineName = DataSource
    myController.ServiceName = myServiceName

    TextBox1.Text += "Stopping service """ & myServiceName & """...." & vbNewLine

    If myController.Status = ServiceProcess.ServiceControllerStatus.Stopped Then
        TextBox1.Text += "Service """ & myServiceName & """ is already stopped" & vbNewLine
    Else

        Try
            myController.Refresh()
            sStatus = myController.Status.ToString
            myController.Stop()
            myController.WaitForStatus(ServiceControllerStatus.Stopped)
            TextBox1.Text += "Service """ & myServiceName & """ stopped..." & vbNewLine
        Catch exp As Exception
            TextBox1.Text += "Could not stop service """ & myServiceName & """" & vbNewLine
        End Try
    End If
End Sub


Public Sub StartService(ByVal myServiceName As String)

    Dim DataSource As String = txtServer.Text
    Dim sStatus As String
    Dim myController As ServiceController

    myController = New ServiceController
    myController.MachineName = DataSource
    myController.ServiceName = myServiceName

    TextBox1.Text += "Starting service """ & myServiceName & """...." & vbNewLine

    Try
        myController.Refresh()
        sStatus = myController.Status.ToString
        myController.Start()
        myController.WaitForStatus(ServiceControllerStatus.Running)
        TextBox1.Text += "Service """ & myServiceName & """ started..." & vbNewLine
    Catch exp As Exception
        TextBox1.Text += "Could not start service """ & myServiceName & """" & vbNewLine
    End Try

End Sub