.NET (Core and Framework)

Public Class data
    Private myUtil As Util = New Util()
    Private strSQL As String = ""
    Public Sub savedata()
        'Label1.Text = "DFDF"
        ' Dim d As data
        TextBox1.Text = "DFDF"
        Try
            strSQL = "Insert into tbldata(pid,pname,pdesc) values(2, 'abc', 'description1')"
            If (myUtil.ExecuteDBCommand(strSQL) = 1) Then
                'MsgBox("Account(s) Assigned Sucessfully!")
            Else
                MessageBox.Show("Could not Save Record!", "Account Information!", MessageBoxButtons.OK, MessageBoxIcon.Information)
                Exit Sub
            End If

        Catch ex As Exception

        End Try

    End Sub

    Private Sub data_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim t1 As Threading.Thread = New Threading.Thread(AddressOf savedata)
        t1.Start()
       

    End Sub
End Class

Console.Write("Enter the IPAddress of the file:");
string ipadd = Console.ReadLine();
IPAddress[] ips = Dns.GetHostAddresses(ipadd);
Socket s = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);
Console.WriteLine("Establishing Connection to{0}", ipadd);
s.Connect(ips[0], 9001);
Console.WriteLine("Connection Established");