---
title: "Angående Access och Delphi"
type: "forum-thread"
url: "https://www.webforum.nu/amne/programmering/98779-angående-access-och-delphi"
topic: "Programmering"
topic_url: "https://www.webforum.nu/amne/programmering"
author: "Xepp"
published: "2004-03-05T11:17:42.000Z"
updated: "2004-03-09T11:54:38.000Z"
replies: 2
views: 206
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/programmering/98779-angående-access-och-delphi"
---

# Angående Access och Delphi

## #1 — Xepp, 2004-03-05T11:17Z

Håller på att göra ett program och ska hämta värden ifrån en databas men får fel i denna kod:

```
procedure TfrmMain.mHiddenDummyClick(Sender: TObject); 
var 
Varde : integer; 
URL : WideString; 
begin 
Varde := TComponent(Sender).Tag; 

ADOQuery2.SQL.Add('Select * from TblFav'); 
ADOQuery2.Open; 
ADOQuery2.SQL.Text := Format('Select Address from TblFav where id = %d', [Varde]); 
ADOQuery2.ExecSQL; 
URL := ADOQuery2.FieldByName('Address').AsString; 
ADOQuery2.Close; 

moBrowser.Navigate(WideString(URL)); 
edtAddress.Text := URL; 
end;
```

Jag ska alltså koppla upp mig mot min Access databas och hämta ett värde under fältet Address där id är Varde. 
Allt funkar med Varde och så. Det som jag får fel på är denna rad:

```
URL := ADOQuery2.FieldByName('Address').AsString;
```

Programet klagar på att fältet Address inte finns, men det gör det. Jag tror inte att det ska vara den där kodraden, utan jag måste på något sätt byta ut 

```
 ADOQuery2.FieldByName('Address').AsString;
```

 mot något annat som ger värdet som hämtas i 

```
ADOQuery2.SQL.Text := Format('Select Address from TblFav where id = %d', [Varde]);
```

Vad tror ni är fel och hur löser jag det?

Väldigt tacksam för svar!

.:: Sebbe

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

## #2 — lajohan, 2004-03-08T21:34Z

Kan kanske bero på att ordet "adress" är felstavat om det inte är samma stavning i databasen förstås

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

## #3 — Hardrocker, 2004-03-09T11:54Z

Vad jag kan se så fyller

```
ADOQuery2.SQL.Add('Select * from TblFav'); 
ADOQuery2.Open;
```

ingen funktion alls.

Felet i din kod är att du måste köra Open istället för ExecSQL. Om man kör ett Select statement så måste man använda open eller sätta active till true.
OBS. kom ihåg att köra close.

/Ante S

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

---

Tråden på webben: https://www.webforum.nu/amne/programmering/98779-angående-access-och-delphi