Connect the server box programatically

This blog shows on how to Connect the server box programatically

Sub LoadDefaultValues()

        txtServerIP.Text = "Server IP address"
        txtUserName.Text = "User Name"
        txtDomain.Text = "Domain Name of the box"

    End Sub

    Private Sub btnConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnConnect.Click

        AxMsTscAxNotSafeForScripting1.Server = txtServerIP.Text.ToString()
        AxMsTscAxNotSafeForScripting1.Domain = txtDomain.Text.ToString()
        AxMsTscAxNotSafeForScripting1.UserName = txtUserName.Text.ToString()
        AxMsTscAxNotSafeForScripting1.Connect()

    End Sub