---
title: "VB databaser."
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/39999-vb-databaser"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "ZeUs"
published: "2002-03-20T15:38:33.000Z"
updated: "2002-03-23T13:35:10.000Z"
replies: 2
views: 231
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/39999-vb-databaser"
---

# VB databaser.

## #1 — ZeUs, 2002-03-20T15:38Z

Jag håller på att göra ett program som man kan använda för att söka i databaser(access). För att kunna använda vilken databas som helst skulle jag vilja koppla labels till fältnamnen i min databas. Jag använder mig av **adodc** kontroll och en **datagrid** .
Min fråga lyder alltså:
Hur ska jag komma åt fältnamnen i databasen från VB?

Tack på förhand

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

## #2 — Insider, 2002-03-22T02:06Z

Den här koden lägger till alla fältnamnen i tabellen till en list box.

```
Dim rec As New ADODB.Recordset
Dim sql As String
Dim antal_faelt As Integer
sql = "SELECT * FROM tabellen"

rec.Open sql, koppling
antal_faelt = rec.Fields.Count

For i = 0 To antal_faelt - 1

List1.AddItem rec.Fields(i).Name

Next i
```

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

## #3 — ZeUs, 2002-03-23T13:35Z

Tackar det fungerade bra med lite modifieringar.

```
antal_faelt = adoAdresser.Recordset.Fields.Count
For i = 0 To antal_faelt - 1
    lstFalt.AddItem adoAdresser.Recordset.Fields(i).Name
Next i
```

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

---

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