[Access] Wyciaganie danych za pomocą zapytan SQL w VBA

Witam,
Jak zrobić żeby zapytanie
"SELECT SUM(Ilosc) as Zmienna FROM Transakcje WHERE Typ = 1"
zwracało mi do zmiennej tą wartość?

Kod wyglada następująco:

Dim IleDost As Integer
Dim Zapytanie As String
Zapytanie = "SELECT SUM(Ilosc) as IleDost FROM Transakcje WHERE Typ = 1"
CurrentProject.Connection.Execute Zapytanie
Me!Sklad.Value = IleDost

Dzieki

Odpowiedzi: 0

Bewuo
Dodano:
14.06.2006 19:02:27
Komentarzy:
0
Strona 0 / 0