Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
[SIZE=1][FONT=Lucida Console]Option Explicit
Public Sub PostcodeEnHuisnummer()
Dim strGemeente As String
Dim strHuisnummer As String
Dim strPostcode As String
Dim strPlaats As String
Dim strProvincie As String
Dim strStraat As String
strPostcode = "3645 BB"
strHuisnummer = "69"
With CreateObject("MSXML.DOMDOCUMENT") 'am_2016
.Async = False
.Load "http://geodata.nationaalgeoregister.nl/geocoder/Geocoder?zoekterm=" & Replace(Trim(strPostcode), " ", "") & "+" & strHuisnummer & " & strict=true"
strStraat = .SelectSingleNode("//xls:Street").Text
strPlaats = .SelectSingleNode("//xls:Place[@type='MunicipalitySubdivision']").Text
strGemeente = .SelectSingleNode("//xls:Place[@type='Municipality']").Text
strProvincie = .SelectSingleNode("//xls:Place[@type='CountrySubdivision']").Text
End With
End Sub[/FONT][/SIZE]
https://www.postcode.nl/1025ZT/234-288
Ja, ik ben al een tijdje aan het dwalen . Ik had die pagina's al gezien, maar daar vind ik niet wat ik zoek. Eigenlijk wil ik zoiets :
Als ik bij www.postcode.nl dit invul: 1025ZT, krijg ik dit terug:
Het gaat mij om het laatste stuk, de Van T/M huisnummers. In mijn eigen postcodetabel zoek ik voor het gros van de adressen eerst in die tabel. We werken namelijk hoofdzakelijk in de regio Amsterdam, dus in de postcodetabel staan alleen Amsterdamse postcodes. Probleem is dus bij adressen die níet in de tabel staan; die moeten worden opgezocht op het internet. Daar voldoet jouw code prima aan, alleen heb ik dus geen van/tm waarden. En die heb ik eigenlijk nodig als ik de postcode ook nog wil toevoegen aan de tabel. Heb je daar nog wat voor misschien?PHP:https://www.postcode.nl/1025ZT/234-288
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.