
|
 |
The above video shows Postcode Lookup
Software integrated into a Microsoft VB.NET application via a SOAP Web
Service. But the service could be used in many other
programming languages.
|
|
Download Programming Examples Demonstrates : COM Object, VB6, SOAP Web service calls with
.NET , MS Access, ASP.NET and examples of the HTTP/XML Web Service.
[Click here for more information] |
|
|
Note: We also provide a HTTP/XML Service
[click
here for HTTP/XML Web Service information]
|
|
|
Easy Integration using SOAP Web Service:
|
 |
Open an on-line
account
|
 |
Get a
"Data Key" from online
account under "Data Keys" Tab
|
 |
Simply create a
Web Reference to http://www.simplylookupadmin.co.uk/WebService.asmx
within .NET project
|
 |
Simply use the
example code to integrate a Postcode Lookup service into
your .NET Application
|
|
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, _
"TestComputer", "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)
End
If |
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, _
"TestComputer", "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
AddressText += "Line1:" & .Line1 & vbCrLf
AddressText += "Line2:" & .Line2 & vbCrLf
AddressText += "Line3:" & .Line3 & vbCrLf
AddressText += "Town:" & .Town & vbCrLf
AddressText += "County:" & .CountyState & vbCrLf
AddressText += "PostCode:" & .PostZipCode & vbCrLf
AddressText += "Country:" & .Country & vbCrLf
AddressText += "DeliverySuffix:" & .DeliveryPointSuffix
& vbCrLf
AddressText += "NoHouseHolds:" & .NoHouseHolds & vbCrLf
AddressText += "SmallOrg:" & .SmallOrg & 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 a unique Computer name, in each call to the Web Service."
In simple language this means that each user must be identified by a
unique computer name.
So "TestComputer" must be each unique Computer name, this is to ensure
any future changes in the Royal Mail License agreement can be
complied with.
Two other examples are included which
get the Thoroughfare or PostZon data from a postcode.
[What
is Full, Thoroughfare
and PostZon Data?]
|
Other Interfaces Available:
|
|
Downloadable
programming Examples
PAF
Postcode Address Lookup Software for Web Sites
PAF
Postcode Address Lookup Software using .NET and SOAP Services
COM
Object for PAF Postcode Address Lookup Software
PAF
Postcode Address Lookup Software Desktop Application Manual
PAF
Postcode Address Lookup using HTTP to request XML data
PAF
Postcode Address Lookup Software Troubleshooting
PAF
Postcode Address Lookup Software WEB Troubleshooting
Terms
and Conditions
Home
Page
|
|