Odnosi se na
Objekt Form |
Objekt Report |
Svojstvom RecordSource određujete izvor podataka za obrazac ili izvješće. Pročitajte/zapišite Niz.
expression.RecordSource
expression Obavezno. Izraz koji vraća jedan od objekata na popisu Primjenjuje se na.
Napomene
Postavka svojstva RecordSource može biti naziv tablice, naziv upita ili SQL naredba. Možete, na primjer, koristiti sljedeće postavke.
Ogledna postavka |
Opis |
Zaposlenici |
Naziv tablice određuje tablicu Zaposlenici kao izvor podataka. |
SELECT Orders!OrderDate FROM Orders; |
SQL naredba koja određuje da je polje DatumNarudžbe u tablici Narudžbe izvor podataka. Kontrolu na obrascu ili izvješću možete vezati s poljem DatumNarudžbe u tablici Narudžbe postavljanjem svojstva kontrole ControlSource na DatumNarudžbe. |
Napomena: Svojstvo RecordSource možete postaviti pomoću koda obrasca ili izvješća list svojstava, makronaredba ili koda programa Visual Basic for Applications (VBA).
U programu VBA koristimo nizovni izraz za postavljanje tog svojstva.
Napomena: Promjena izvora podataka otvorenog obrasca ili izvješća uzrokuje automatsko ponavljanje upita pozadinskih podataka. Ako je svojstvo Recordset obrasca postavljeno za vrijeme izvođenja, ažurirat će se svojstvo RecordSource obrasca.
Kada stvorite obrazac ili izvješće, možete promijeniti njegov izvor podataka promjenom svojstva RecordSource. Svojstvo RecordSource korisno je i kada želite stvoriti obrazac ili izvješće za ponovnu upotrebu. Mogli biste, na primjer, stvoriti obrazac koji sadrži standardni dizajn, zatim kopirati obrazac i promijeniti svojstvo RecordSource radi prikaza podataka iz druge tablice ili SQL naredbe ili drugog upita.
Ograničavanje broja zapisa sadržanih u izvoru zapisa obrasca može poboljšati performanse, pogotovo kada se program izvodi na mreži. Možete, na primjer, postaviti svojstvo RecordSource obrasca na SQL naredbu koja vraća jedan zapis i mijenja izvor zapisa obrasca ovisno kriterijima korisnika.
Primjer
Sljedeći primjer postavlja svojstvo RecordSource obrasca na tablicu Klijenti:
Forms!frmCustomers.RecordSource = "Customers"
Sljedeći primjer mijenja izvor zapisa obrasca u jedan zapis u tablici Klijenti ovisno o nazivu tvrtke odabranom u kontroli kombiniranog okvira cmboCompanyName. U kombinirani je okvir unesena SQL naredba koja vraća ID klijenta (u vezanom stupcu) i naziv tvrtke. IDKlijenta sadrži vrstu podataka Text.
Sub cmboCompanyName_AfterUpdate()
Dim strNewRecord As String strNewRecord = "SELECT * FROM Customers " _ & " WHERE CustomerID = '" _ & Me!cmboCompanyName.Value & "'" Me.RecordSource = strNewRecord End Sub