Problem z wyświetlenie tabeli w VBA Opcje

[kaznodzieja]

W jaki sposób w accesie w VBA wyswietlić cała tabele a nie tylko pierwszy rekord:

Napisałem coś takiego aleto wyswietla tylko pierwszy rekord

[PHP] pobierz, plaintext 
<?php
Set rst = conn.Execute("Select * from testowa")
 
For intPoczatek = 1 To strCosik1 Step 1
 
	Debug.Print rst("pole2") & " " & rst("pole1")
 
Next intPoczatek
?>
[PHP] pobierz, plaintext 

ps Te zlesze dodał interpretator kodu php
strCosik1 zawiera liczbe rekordów w tabeli

Wymyśliłem takie rozwiązanie.Może mało optymalne ale działające

For intPoczatek = 1 To strCosik1 Step 1
Let varZm = intPoczatek

Set rst = conn.Execute("Select * from testowa Where id = " & varZm & "")
Debug.Print varZm & " --- " & rst("pole2") & " ::: " & rst("pole1")

Next intPoczatek


gdzie strCosik1 to liczna rekordów w tabeli a varZm to tylko przypisanie licznika pętli

Ten post edytował kaznodzieja 12.07.2007, 11:58:38