Gjelder for
|
Skjemaobjekt |
|
Report-objektet |
Du kan bruke egenskapen RecordSource for å angi kilden til dataene for en skjema eller rapport. Lese/skrive Streng.
uttrykk.RecordSource
uttrykk Påkrevd. Et uttrykk som returnerer ett av objektene i Gjelder for-listen.
Merknader
Innstillingen for egenskapen RecordSource kan være et tabellnavn, spørringsnavn eller et SQL-uttrykk. Du kan for eksempel bruke følgende innstillinger.
|
Prøveinnstilling |
Beskrivelse |
|
Ansatte |
Et tabellnavn som angir tabellen Ansatte som datakilden. |
|
SELECT Orders!OrderDate FROM Orders; |
Et SQL-uttrykk angir OrderDate-feltet på tabellen Ordre som datakilden. Du kan binde en kontroll i skjemaet eller rapporten til OrderDate-feltet på Ordre-tabellen, ved å angi kontrollens egenskap ControlSource til OrderDate. |
Obs!: Du kan angi egenskapen RecordSource ved hjelp av skjemaets eller rapportens egenskapsark, en makro, eller Visual Basic for Applications (VBA)-kode.
For VBA: Bruk en strenguttrykk for å angi denne egenskapen.
Obs!: Hvis du endrer postkilden til et åpent skjema eller en åpen rapport, kjøres det automatisk en ny spørring for de underliggende dataene. Hvis skjemaets egenskap Recordset er angitt til kjøretid, oppdateres skjemaets egenskap RecordSource.
Etter at du har opprettet et skjema eller en rapport, kan du endre datakilden ved å endre egenskapen RecordSource. Egenskapen RecordSource er også nyttig hvis du ønsker å opprette et skjema eller en rapport som kan brukes på nytt. Du kan for eksempel opprette et skjema som inneholder et standarddesign, deretter kopiere skjemaet og endre egenskapen RecordSource til å vise data fra en annen tabell, spørring eller SQL-uttrykk.
Hvis du begrenser antallet poster i postkilden for et skjema, kan det forbedre ytelsen, spesielt når programmet kjøres på et nettverk. Du kan for eksempel angi skjemaets egenskap RecordSource til et SQL-uttrykk som returnerer én enkelt post, og endre skjemaets postkilde avhengig av vilkårene som velges av brukeren.
Eksempel
Følgende eksempel angir skjemaets egenskap RecordSource til tabellen Kunder.
Forms!frmCustomers.RecordSource = "Customers"
Det neste eksemplet endrer skjemaets postkilde til én enkelt post i tabellen Kunder, avhengig av firmanavnet som velges i kombinasjonsbokskontrollen for cmboCompanyName. Kombinasjonsboksen fylles av et SQL-uttrykk som returnerer kunde-ID-en (i den bundne kolonnen) og firmanavnet. Kunde-ID-en har en Tekst-datatype.
Sub cmboCompanyName_AfterUpdate()
Dim strNewRecord As String
strNewRecord = "SELECT * FROM Customers " _
& " WHERE CustomerID = '" _
& Me!cmboCompanyName.Value & "'"
Me.RecordSource = strNewRecord
End Sub
