Archief - [PROG]-[VB-ACCESS] Records zoeken in Access

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.

Cisse

Legacy Member
Ik heb ier een table Leveranciers aangemaakt.

Nu heb ik een form gecreeerd met een combobox waar alle namen van de leveranciers inkomen. Daarboven heb ik een knop aangemaakt "Bekijk".

Het is de bedoeling als ik in de combobox een leverancier selecteer en op knop bekijk klik, dat er een form geopend wordt met de informatie van de gekozen leverancier.

Op dit moment is de VB code achter de knop de volgende :

Private Sub btnZoeken_Click()
On Error GoTo Err_btnZoeken_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmLeverancier"

stLinkCriteria = "[Naam]=" & "'" & Me![LevNaam] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_btnZoeken_Click:
Exit Sub

Err_btnZoeken_Click:
MsgBox Err.Description
Resume Exit_btnZoeken_Click

End Sub

Dit geeft echter de fout "Leveranciers cant find the fieldname levNaam in the expression" terwijl LevNaam wel degelijk in de tabel Leveranciers staat , met in die kolom de namen van de leveranciers.

Weet er iemand hoe ik dit oplos ?

[DZM]TheOne

Legacy Member
Cisse zei:
Ik heb ier een table Leveranciers aangemaakt.

Nu heb ik een form gecreeerd met een combobox waar alle namen van de leveranciers inkomen. Daarboven heb ik een knop aangemaakt "Bekijk".

Het is de bedoeling als ik in de combobox een leverancier selecteer en op knop bekijk klik, dat er een form geopend wordt met de informatie van de gekozen leverancier.

Op dit moment is de VB code achter de knop de volgende :

Private Sub btnZoeken_Click()
On Error GoTo Err_btnZoeken_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmLeverancier"

stLinkCriteria = "[Naam]=" & "'" & Me![LevNaam] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_btnZoeken_Click:
Exit Sub

Err_btnZoeken_Click:
MsgBox Err.Description
Resume Exit_btnZoeken_Click

End Sub

Dit geeft echter de fout "Leveranciers cant find the fieldname levNaam in the expression" terwijl LevNaam wel degelijk in de tabel Leveranciers staat , met in die kolom de namen van de leveranciers.

Weet er iemand hoe ik dit oplos ?

levNaam <> LevNaam
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan