Android Question Transferring Images Over A TCP/IP Socket

using System;
using System.Collections.Generic;
using System.Text;
using System.Net.Sockets;
using System.Net;
using System.IO;

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(String[] args)
        {
            // 1. to create a socket
            Socket sListen = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);

            // 2. Fill IP
            IPAddress IP = IPAddress.Parse("192.168.1.2");
            IPEndPoint IPE = new IPEndPoint(IP, 6000);

            // 3. binding
            sListen.Bind(IPE);

            // 4. Monitor
            Console.WriteLine("Service is listening ...");
            sListen.Listen(2);

            // 5. loop to accept client connection requests
            while (true)
            {
                Socket clientSocket;
                try
                {
                    clientSocket = sListen.Accept();
                }
                catch
                {
                    throw;
                }

             
                // send the file
                byte[] buffer = ReadImageFile("c:\\images\\test.png");
                clientSocket.Send(buffer, buffer.Length, SocketFlags.None);
                Console.WriteLine("Send success!");
            }
        }

        private static byte[] ReadImageFile(String img)
        {
            FileInfo fileInfo = new FileInfo(img);
            byte[] buf = new byte[fileInfo.Length];
            FileStream fs = new FileStream(img, FileMode.Open, FileAccess.Read);
            fs.Read(buf, 0, buf.Length);
            fs.Close();
            //fileInfo.Delete ();
            GC.ReRegisterForFinalize(fileInfo);
            GC.ReRegisterForFinalize(fs);
            return buf;
        }

    }
}

Sub Process_Globals
    Dim Socket1 As Socket
  Dim AStreams As AsyncStreams
  Dim Bitmap1 As Bitmap
End Sub

Sub Globals

End Sub

Sub Activity_Create(FirstTime As Boolean)
    Socket1.Initialize("Socket1")
    Socket1.Connect("192.168.1.2" , 6000, 20000)
End Sub

Sub Socket1_Connected (Successful As Boolean)
    If (Successful) Then
      AStreams.Initialize(Socket1.InputStream, Socket1.OutputStream,"AStreams")
      ToastMessageShow("connected",False)
  Else
      Msgbox(LastException.Message, "Error connecting")
      Socket1.Close
      Activity.Finish
    End If
End Sub

Sub AStreams_NewData (Buffer() As Byte)
  '  Dim msg As String
  '  msg = BytesToString(Buffer, 0, Buffer.Length, "UTF8")
    Dim out As OutputStream
    out = File.OpenOutput(File.DirRootExternal, "newimage.png", False)
    out.WriteBytes(Buffer, 0, Buffer.Length)
    out.Close
  ' Msgbox("Time received: " & CRLF & msg, "")
    Socket1.Close
  Activity.Finish
End Sub