---
title: "Access - random ?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/databaser-sql/77372-access-random"
topic: "Databaser & SQL"
topic_url: "https://www.webforum.nu/amne/databaser-sql"
author: "jurgen"
published: "2003-05-19T08:53:32.000Z"
updated: "2003-05-20T08:14:49.000Z"
replies: 1
views: 302
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/databaser-sql/77372-access-random"
---

# Access - random ?

## #1 — jurgen, 2003-05-19T08:53Z

om man vill få ut en slumpvald post av( "Select \* From tavlor Where konstrundan='JA'") i en access db.vilket e det snabbaste sättet ?

Permalänk: https://www.webforum.nu/p/77372

## #2 — Engine^, 2003-05-20T08:14Z

Använd dig av ett räknarfält, så kan du använda typ följande kodsnutt

```
Public GetRandomCounter As Integer
  Dim rsValues As New ADODB.RecordSet
  Dim strSQL As String

  strSQL = "SELECT intCounter FROM tavlor WHERE konstrundan = 'JA'"
  rsValues.Open strSQL, CurrentProject.Connection, adOpenForwardOnly, adLockReadOnly

  Randomize
  rsValues.Move CLng((rsValues.RecordCount * Rnd) + 1)

  GetRandomCounter = CInt(rsValues("intCounter"))

  Set rsValues = Nothing
End Function

strSQL = "SELECT * FROM tavlor WHERE intCounter = " & GetRandomCounter
```

*intCounter* stoppade jag bara in... om du inte har något sådant fält för att hämta dina tavlor föreslår jag att du lägger till ett sånt fält ;) Det gör hanteringen lite enklare om inte annat.

Permalänk: https://www.webforum.nu/p/1056623

---

Tråden på webben: https://www.webforum.nu/amne/databaser-sql/77372-access-random