using FaxWSConsoleApplication.FaxWSReference;
using System;

namespace FaxWSConsoleApplication
{
    public static class CheckServiceClass
    {
        const string faxWSUrl = "https://ws.concordfax.com/fax/v5";

        public static void CheckService()
        {
            using(FaxWS ws = new FaxWS())
            {
                ws.Url = faxWSUrl;

                try
                {
                    string serverStatus = ws.CheckService();

                    Console.WriteLine("Server Status: " + serverStatus);
                }
                catch(Exception ex)
                {
                    Console.WriteLine("Error while calling CheckService : " + ex.Message);
                }

            }
        }
    }
}

Imports FaxWSVBConsoleApplication.FaxWSReference

Namespace FaxWSVBConsoleApplication
    Friend Class CheckServiceClass
        Public Shared Sub CheckService()
            Using ws As FaxWS = New FaxWS()

                Try
                    Dim serverStatus As String = ws.CheckService()
                    Console.WriteLine("Server Status: " & serverStatus)
                Catch ex As Exception
                    Console.WriteLine("Error while calling CheckService : " & ex.Message)
                    Return
                End Try
            End Using
        End Sub
    End Class
End Namespace