Keuzelijst-form- andere waarden opslaan

Status
Niet open voor verdere reacties.

bregtv

Gebruiker
Lid geworden
15 dec 2006
Berichten
11
nb: relatietabel: zie bijlage

Mijn probleem: Ik heb in de tabel "ACC" attitudes, codes en commentaren staan. (bv. -inzet-Uitstekend-Prima gewerkt!)
in de tabel beoordelingen wil ik mbv een formulier de leerling plaatsen met de desbetreffende attitude, code en commentaar. Maar het kan zijn dat de "standaardcommentaar" uit de tabel ACC aangepast moet worden. Deze waarde wil ik dan in de tabel "beoordelingen" in het veld "commentaar" zetten. (Zodat het veld "commentaar" in "ACC" ongewijzigd blijft).

Hoe kan ik dit verwezenlijken?

Alvast bedankt voor de reacties!
 

Bijlagen

  • DBRelatie.jpg
    DBRelatie.jpg
    54,4 KB · Weergaven: 30
Als je de waarde invult zoekt hij dan de omschrijving erbij ??

Ik zou namelijk een omschrijving veld nemen die standaard d.m.v. Dlookup wordt gevuld nat het in vullen van de optie zo kun je achter af de waarde wijzigen.
 
Ik heb die DLookup eens geprobeerd. Veld per veld opzoeken lukt, maar 2 voorwaarden in 1 keer niet.
Dit is de code:

Private Sub Code_Click()
On Error GoTo Err_Code_Click

Dim strFilter As String
strFilter = "AttitudeID = " & Me.Attitude And "CodeID = " & Me.Code

Me![Commentaar] = DLookup("[Commentaar]", "ACC", strFilter)

Exit_Code_Click:
Exit Sub

Err_Code_Click:
MsgBox Err.Description
Resume Exit_Code_Click
End Sub

Mag die "And" er niet tussen? Hoe doe ik het anders?

2de vraag: welke code moet ik uiteindelijk gebruiken bij het saven zodat hij de waarde in tabel ACC ongewijzigd laat, maar de waarde in de tabel Beoordelingen bij "commentaar" zet?

Alvast bedankt voor de reactie!
 
Laatst bewerkt:
Sorry voor mijn late reactie maar

maak van

Code:
strFilter = "AttitudeID = " & Me.Attitude And "CodeID = " & Me.Code

eens

Code:
strFilter = "AttitudeID = " & Me.Attitude &"And CodeID = " & Me.Code

dan zou hij het moeten doen

dit komt dat het bij een dlookup het laatste statement als volgt moet zijn
als je op meerdere waardes zoekt

"[Txt1]='1' and [Txt2]='1'"

en het werkt dus niet omdatje er neerzet
"[Txt1]='1'"and" [Txt2]='1'"
 
Heel erg bedankt voor het duidelijk antwoord! Dit deel werkt nu volledig.
Aleen zit ik nog in de knoei met het saven van deze data omdat hij de waarde niet mag "overschrijven" in die ACC-tabel, maar deze moet in de beoordelingentabel komen. Enig idee hoe ik dit kan doen?

Grtz,
Bregt
 
Iemand enig idee? Voor de rest lukt het me

Alvast bedankt voor een helpend antwoord!
 
Wat is je probleem met het opslaan??

dom dom van mij :confused: het commentaarveld was nog een "onafhankelijk" veld ipv dat deze verwees naar het commentaarveld in de tabel beoordelingen. Het werkt nu!
Merci
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan