Windows Phone Upload Send file to Server (Web Server)

Imports System.Runtime.Serialization
Imports System.Runtime.Serialization.Json
Imports System.Collections.ObjectModel
Imports System.IO
Imports System.Text
Imports System.Xml.Linq
Imports System.Windows.Media.Imaging
Imports System.Xml
Imports System.IO.IsolatedStorage
Imports Microsoft.Phone.Tasks

Partial Public Class MainPage
    Inherits PhoneApplicationPage

    ' Constructor
    Public Sub New()
        InitializeComponent()

        AddHandler Loaded, AddressOf MainPage_Loaded
    End Sub

    Dim client As WebClient
    Dim strFileName As String = "img1.jpg"

    Private Sub MainPage_Loaded(sender As Object, e As System.Windows.RoutedEventArgs)

        Dim ub As New UriBuilder("http://localhost/myphp/upload.php")
        ub.Query = "file=" & strFileName

        client = New WebClient()
        AddHandler client.OpenWriteCompleted, AddressOf client_OpenWriteCompleted
        client.OpenWriteAsync(ub.Uri)

    End Sub
  

    Private Sub client_OpenWriteCompleted(sender As Object, e As OpenWriteCompletedEventArgs)
        If e.Cancelled = False And e.Error Is Nothing Then

            Dim image As New BitmapImage()
            Dim isoStore As IsolatedStorageFile = IsolatedStorageFile.GetUserStoreForApplication()
            Dim isoFilename As String = strFileName
            Dim stream As Stream = isoStore.OpenFile(isoFilename, System.IO.FileMode.Open)

            Dim output As Stream = e.Result

            Dim bytes As Byte() = New Byte(4095) {}
            Dim bytesToRead As Integer = 0
            While (InlineAssignHelper(bytesToRead, stream.Read(bytes, 0, bytes.Length))) <> 0
                output.Write(bytes, 0, bytesToRead)
            End While
            stream.Close()
            output.Close()

            Me.txtResult.Text = "Upload Completed."
        Else
            Me.txtResult.Text = "Upload Failed."
        End If
    End Sub

    Private Shared Function InlineAssignHelper(Of T)(ByRef target As T, ByVal value As T) As T
        target = value
        Return value
    End Function

End Class

using System;
using System.Windows;
using Microsoft.Phone.Controls;
using System.Collections.Generic;
using System.Collections.ObjectModel;
using System.IO;
using System.Text;
using Microsoft.Phone.Shell;
using System.Windows.Controls;
using System.Net;
using System.Windows.Media.Imaging;
using System.IO.IsolatedStorage;

namespace PhoneApp
{
    public partial class MainPage : PhoneApplicationPage
    {

        // Constructor
        public MainPage()
        {
            InitializeComponent();
            Loaded += MainPage_Loaded;
        }

        WebClient client;
        string strFileName = "img1.jpg";

        private void MainPage_Loaded(object sender, System.Windows.RoutedEventArgs e)
        {
            UriBuilder ub = new UriBuilder("http://localhost/myphp/upload.php");
            ub.Query = "file=" + strFileName;

            client = new WebClient();
            client.OpenWriteCompleted += client_OpenWriteCompleted;
            client.OpenWriteAsync(ub.Uri);

        }

        private void client_OpenWriteCompleted(object sender, OpenWriteCompletedEventArgs e)
        {

            if (e.Cancelled == false & e.Error == null)
            {
                BitmapImage image = new BitmapImage();
                IsolatedStorageFile isoStore = IsolatedStorageFile.GetUserStoreForApplication();
                string isoFilename = strFileName;
                Stream stream = isoStore.OpenFile(isoFilename, System.IO.FileMode.Open);

                Stream output = e.Result;

                byte[] bytes = new byte[4096];
                int bytesToRead = 0;
                while ((bytesToRead = stream.Read(bytes, 0, bytes.Length)) != 0)
                {
                    output.Write(bytes, 0, bytesToRead);
                }
                stream.Close();
                output.Close();

                this.txtResult.Text = "Upload Completed.";
            }
            else
            {
                this.txtResult.Text = "Upload Failed.";
            }
        }

    }
}