Postcode Lookup Address Software for Bespoke

Desktop Application including Goldmine, ACT, Microsoft CRM and Enterprise

Web Integration

Integration into Bespoke Applications using COM Objects

Integration into Bespoke Applications using SOAP Web Service

Click here to download software

Free 30 Day Evaluation

Click here for Prices

Postcode Address Lookup for Bespoke Application using COM Object:

Easy Integration using COM Object in VB 6 or any other programming language:

Simply download application and install on network.  

Add button to your Application, to activate the Postcode Address search, using the following code.  

VB.NET/Visual Basic Postcode Address Search Code:

'Open Postcode Address Search object to perform search
Dim LookupSoftware As Object
Set LookupSoftware = GetObject("", "COMAddress.Lookup")

With LookupSoftware

   ' US=Zip code search,UK=Postcode address Search
   .SearchType = "UK" 

   'To prime search box from your application
   .SearchPrima = "" 

   'Set search window Title
   .SearchTitle = "Search Example" 

   'Show Address Search window
   If .SearchForCode() Then

      'The following are for UK Only
      Me.DeliveryPointSuffix = .DeliveryPointSuffix
      Me.nohouseholds = .nohouseholds
      Me.smallorg = .smallorg
   Else
      'Postcode Address Search cancelled
   End If
End With

COMAddress.Lookup is a COM object, which in the above example is being used in VB, but the same object could easily be used with VB.NET, Delphi, and another language which allows you to create and use a COM object.

The above code will call our standard address lookup desktop application which is running in the background.   

This has the advantage that the address lookup search window can be used with other applications which the user may be using.

Postcode Address Lookup for Microsoft .NET Application:

Download sample code 

Easy Integration using SOAP Web Service:

Click here for the SOAP Web Service

http://www.SimplyLookupadmin.co.uk/WebService.asmx

Example code for Postcode Address Lookup SOAP Web Service in VB.NET:

'Search for full Postcode or other address fields

Me.ListView1.Items.Clear()

'Define the SOAP Web service to get Postal address by Postcode

Dim PostcodeSearch As New PostcodeWebService.WebService

Dim SearchPrima As New PL_SearchPrimaRecord

Dim AddressesDataReturned As New PL_AddressesDataReturnedRecord

'Set search criteria, either full Postcode or Two other address fields

With SearchPrima

  .Postcode = Me.InpPostcode.Text

End With

'Do Search, on Postcode or two or more address fields

AddressesDataReturned = PostcodeSearch.SearchForAddress( _

       Me.InpDataKey.Text, _

      "TestUser", "UK", SearchPrima)

If AddressesDataReturned.SearchPerformedWithoutError Then

  'Display results, no major error

  If AddressesDataReturned.ErrorMessage <> "" Then 

    MsgBox(AddressesDataReturned.ErrorMessage)

  With AddressesDataReturned

    'Show amount of Postocde Lookup credits left

    Me.Text = .CreditsStatusText

    'Remember the URL to buy more Postocde Lookup credits

    LinkToBuyMoreCredits = .BuyMoreCreditsURL

    Me.LinkTOBuyMore.Visible = True

    'Put Address data in listview

    Dim x&

    For x = 0 To .LineCount

      Dim itemToAdd As ListViewItem = ListView1.Items.Add(   

                        _.Lines(x).ID, 0)

      itemToAdd.SubItems.Add(.Lines(x).Address)

    Next

  End With

  Me.TabControl1.SelectedIndex = 1

Else

  'Display error (Account stuff mostly)

  MsgBox(AddressesDataReturned.ErrorMessage)

And to finally read the Postal Address:

'Get ID from Listbox in hidden column 0

Dim AddressID As String = ListView1.Items(ListView1.SelectedItems.Item(0).Index).SubItems(0).Text

'Define Postcode Address Lookup SOAP Web service

Dim PostcodeSearch As New POstcodeWebService.WebService

Dim Address As PL_AddressRecord

'Ask for Address by ID

Address = PostcodeSearch.GetAddressRecord(Me.InpDataKey.Text, _

          "TestUser", "UK", AddressID)

Me.TabControl1.SelectedIndex = 2

If Address.AddressRecordGotWithoutError Then

  'Display results

  If Address.ErrorMessage <> "" Then MsgBox(Address.ErrorMessage)

  'Process the Address to text field

  Dim AddressText As String

  With Address

    AddressText = "Company:" & .CompanyName & vbCrLf

  End With

  Me.TxtAddress.Text = AddressText

Else

  'Display error (Account stuff mostly)

  MsgBox(Address.ErrorMessage)

End If

Please note: Section 3.5 of the terms and conditions state: "The Customer, when using the Postcode Lookup service via Web Service, must make sure each user is identified by username, in each call to the Web Service."   In simple language this means that each user must be identified by a unique username.  

So "TestUser" must be each user name, this is to ensure any future changes in the Royal Mail License agreement can be complied with.

Other Features and

Simple Installation:

Interfaces with all top packages:

Cost Effective:

Search Options:

Always up to date:

Other Information:

Click on the Download link below to quickly install and use Simply Postcode Address Lookup Software, with Goldmine (Frontrange).   

Simply Postcode Address Lookup for Enterprise

Simply Postcode Address Lookup for Goldmine

Simply Postcode Address Lookup for ACT

Simply Postcode Address Lookup for Microsoft CRM

Simply Postcode Lookup for Bespoke and Web Applications