Find nærmeste forhandler?

hvis du har en tabel der hedder postnummer..

Så laver du bare et kald med sql-sætningen.

sql = "Select * from tabel where postnummer = " & request.form("postnummer")
derefter

if rs.eof then
response.write "Der er ingen i dit postdistrikt"
else
while not rs.eof
response.write forhandlerinfo
rs.movenext
wend

og det skulle så have været et svar...

Skriv hvis du har problemer!

Det var vel egentlig ikke det, han spurgte om. "Nærmeste forhandler" kan da sagtens have postnr. 2450 eller 2300, hvis dit postnr. er 2200.

hvis du kigger på den anden side, og tester postnummer 4320 (holbæk) så viser den ingen resultater...

Jeg kunne forestille mig noget i denne stil, hvor du får returneret 1 eller 2 postnumre, der lægger tættest på brugerens postnr.

Set rs = Conn.Execute("Select Top 1 Postnr From Postnumre Where Postnr <= 2500 Order By Postnr Desc Union Select Top 1 Postnr From Postnumre Where Postnr >= 2500 Order By Postnr")

While Not rs.EOF
    Response.Write rs("Postnr") & "<br>"
    rs.MoveNext
Wend

Nu tillod jeg mig forresten at gå ud fra, du bruger Access.

Du er nødt til at starte med at definerer præcist hvad du mener med nærmeste. Er det nærmeste postnummer det der nummerisk ligger tættest. Skal der tages højde for at folk fx ikke ønsker at krydse storebælt selvom nyborg og korsørs postnumre grænser op til hinanden osv.

Når du har det nede på papir, meget præcist defineret, så kan du begynde at blande en computer ind i det, ikke før :-)

Sikke et møgarbejde ;)