Wie binde ich Edith: Distance in ASP ein?

Das folgende Beispiel fragt alle Postleitzahlen im Umkreis von 25 km um die Postleitzahl 30175 ab. Es wird die XML-RPC-Bibliothek von David Carter-Tod (http://david.carter-tod.com/XMLRPC/default.asp) verwendet:

<!-- Bibliothek einbinden -->
<!--#include virtual="/k4asp/xmlrpc.asp" -->
<%
    'Parameter vorbereiten
    Dim paramList(3)
    Dim url
    paramList(0) = 1
    paramList(1) = "30175"
    paramList(2) = 25

    'Funktion aufrufen
    url = "http://www.kontor4.de/edithdistance/distance.php"
    myresp = xmlRPC (url, "edithDistance.showRelated", paramList)

    'Ergebnisse als Tabelle anzeigen
    response.write( "<table border='1'>")
    for i = 0 to ubound(myresp)
        response.write("<tr><td>" & myresp(i).Item("plz"))
        response.write("</td><td>" & myresp(i).Item("distance"))
        response.write("</td></tr>")
    next
    response.write( "</table>")
%>