Hej någon som kan hjälpa mig med ett script för att plocka ut 4 poster ur en databas
När RecSet.EOF
Närmast lägre: höjd
Närmast Högre: höjd
Närmast lägre :bredd
Närmast högre :höjd
Tacksam för hjälp

Mvh
Martin

Du får nog försöka förklara lite mer vad du vill göra... För mig som inte är insatt i vad du pysslar med är det lite svårt att förstå.

/Johan

Ok provar lite tydligare jag har en databas med olika höjd och bredd i tabeller.
som är stadardhöjder ex: 2000 bred 2400 hög
dom ligger med 200 intervaller
2000,2200,2400 osv
värdet kommer från ett formulär
Då vill jag om man matar in ett värde som är ex: 2105 så skall det väljas ett värde som är närmast lågt alltså:2000 och närmast hög blir 2200
Både på bredd och höjd
Mvh
Martin

Hur brett kan intevallet vara?
är det från 200 uppåt, eller är det bara dom fyra du skrev?

<code></code>
Du kan ju se om denna fråga ger resultat du vill ha:
<code>
Dim strSQL
Dim lngHöjd
Dim lngBredd

lngHöjd = 2105
lngBredd = 2105

strSQL = "SELECT (SELECT Max(höjd)) FROM TabellNamn WHERE höjd <=" & lngHöjd & ") As LägreHöjd, " & vbCrLf & _
" (SELECT Min(höjd)) FROM TabellNamn WHERE höjd >=" & lngHöjd & ") As HögreHöjd, " & vbCrLf & _
" (SELECT Max(bredd)) FROM TabellNamn WHERE Bredd <=" & lngBredd & ") As LägreBredd, " & vbCrLf & _
" (SELECT Min(bredd)) FROM TabellNamn WHERE Bredd >=" & lngBredd & ") As HögreBredd"
</code>