---
title: "vb + access = ?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/77535-vb-access"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "Kajsa"
published: "2003-05-20T08:59:05.000Z"
updated: "2003-05-26T08:30:00.000Z"
replies: 6
views: 326
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/dotnet/77535-vb-access"
---

# vb + access = ?

## #1 — Kajsa, 2003-05-20T08:59Z

Hej

Lätt fråga kanske, men hur kopplar man access databas till vb aplikation?

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

## #2 — mrblonde, 2003-05-20T09:42Z

vad skall du göra? Det är lätt att skapa en koppling, men vad du ska göra sen är en annan fråga.

Här finns lite tips: <http://www.able-consulting.com/MDAC/ADO/Connection/ODBC_DSNLess.htm#ODBCDriverForAccess>

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

## #3 — Engine^, 2003-05-20T09:43Z

```
Dim adoConn As New ADODB.Connection
Dim strConn As String

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=[i]sökvägen + databasnamn[/i]"

adoConn.Open strConn [blue]'Så, nu har du en anslutning till en accessdatabas...[/blue]

Dim rsObj As New ADODB.RecordSet
Dim strSQL As String

strSQL = "SELECT * FROM [i]tabell[/i]"

rsObj.Open strSQL, adoConn [blue]'Ett recordset förhoppningsvis...
  .
  .
  .[/blue]
Set rsObj = Nothing
Set adoConn = Nothing
```

Det finns givetvis massor att läsa om detta ämne. Förslagsvis på [MSDN: ADO API Reference](http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdaobj01.asp)

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

## #4 — Kajsa, 2003-05-26T07:36Z

Tack för hjälpen! Det funkade. 

Nu kommer min nästa fråga  :r 

När jag hämtar saker och ting ur databasen vill jag presentera det i en listbox tex. Det funkar att visa info i en label, men inte i en listbox. Vad gör jag för fel?

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

## #5 — @nders, 2003-05-26T07:38Z

Om du visar din kod, så blir det lättare att se vad du gör galet.

(välkommen till wF också!)

mvh,

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

## #6 — Kajsa, 2003-05-26T08:11Z

Tack så mycket! 

Jo, jag har gjort så som Engine^ skrev ovan och det gick bra.

Sen har jag försökt hämta en kolumn i en db med:

i = rsObj.GetString

Eller hur gör man när man vill hämta rad för rad i ur db:n Skall jag köra nån slags for-loop?

I java finns ju getNext (?) eller när man loopar i en array eller liknande... men jag är ju som sagt novis inom vb:n

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

## #7 — Engine^, 2003-05-26T08:30Z

Lite enklare om du hämtar med kolumnens namn

```
Set rsObj = adoConn.Execute("SELECT [i]kolumn1, kolumn2[/i] FROM [i]tabell[/i] WHERE [i]kolumn1[/i] = 'Hallon'", , 1)
[blue]Ovan är (i stort sett) samma som
rsObj.Open "SELECT [i]kolumn1, kolumn2[/i] FROM [i]tabell[/i] WHERE [i]kolumn1[/i] = 'Hallon'", adoConn[/blue]

Dim strValue As String [blue]'om [i]kolumn1[/i] innehåller strängar...
While Not rsObj.EOF
  strValue = rsObj("[i]kolumn1[/i]")

  rsObj.MoveNext
Wend
```

Skillnaden mellan att använda *connection.Execute* och *recordset.open* är att med connection så returneras endast ett recordset med read-only, forward-only. Behöver du göra förändringar i ditt recordset bör du använda recordset.open med de nödvändiga egenskaperna.

**red.** Lite mer att läsa om [Execute, Requery and Clear Methods](http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdaexamples_vb01_26.asp)

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

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/77535-vb-access