Michiel Karel
Gebruiker
- Lid geworden
- 14 feb 2007
- Berichten
- 49
Hallo,
Ik heb op mijn hoofdform de volgende elementen:
Combo1: Van land
Combo2: Naar land
subform1: results query na invullen combo's (zijn dus criteria in de query)
subform2: dit moet een pivot worden, kom ik later op terug
afterupdate van combo2: show results in subform1.
Private Sub cbo_CDB_Country_To_AfterUpdate()
Dim stdocname As String
stdocname = "10_Carrier_Selection"
DoCmd.Requery
Me.CDB_subfrm_Carrier_Results.Requery
End Sub
Dit werkt prima.
Nu heb ik elke result een ID meegegeven (genoemd: searchcode)
Mijn doel is om de achterliggende gegevens van 1 result te kunnen weergeven in subform 2.
Ik heb een textbox waar men de searchcode uit de record van subform1 kan invullen.
Zodra deze textbox wordt bijgewerkt (afterupdate) wordt er een create-table-query gestart die zorgt voor een tabel met daarin alle records van de betreffende searchcode.
Nu wil ik deze tabel weergeven (in draaitabelvorm) in subform2. Alleen lukt dit me niet, als ik bij eigenschappen van subform2 als bronobject de tabel (die voortkomt uit de create-table-query) selecteer zegt access 2003 dat de tabel al in gebruik is.
de volgende code werkt ook niet:
Private Sub txt_CDB_Search_Code_AfterUpdate()
Dim stdocname As String
stdocname = "11_Pivot_Data_Selected_Carrier"
DoCmd.SetWarnings False
DoCmd.OpenQuery stdocname
DoCmd.SetWarnings True
If txt_CDB_Search_Code.Value Is Not Null Then
Me.CDB_subfrm_Pivot.SourceObject = "11_Pivot_Data_Selected_Carrier_Temp"
Else: Me.CDB_subfrm_Pivot.SourceObject = ""
End If
End Sub
Ook zonder het If , Then, Else gebeuren krijg ik dit niet voor elkaar
.
Wie kan mij helpen?!
Ik heb op mijn hoofdform de volgende elementen:
Combo1: Van land
Combo2: Naar land
subform1: results query na invullen combo's (zijn dus criteria in de query)
subform2: dit moet een pivot worden, kom ik later op terug
afterupdate van combo2: show results in subform1.
Private Sub cbo_CDB_Country_To_AfterUpdate()
Dim stdocname As String
stdocname = "10_Carrier_Selection"
DoCmd.Requery
Me.CDB_subfrm_Carrier_Results.Requery
End Sub
Dit werkt prima.
Nu heb ik elke result een ID meegegeven (genoemd: searchcode)
Mijn doel is om de achterliggende gegevens van 1 result te kunnen weergeven in subform 2.
Ik heb een textbox waar men de searchcode uit de record van subform1 kan invullen.
Zodra deze textbox wordt bijgewerkt (afterupdate) wordt er een create-table-query gestart die zorgt voor een tabel met daarin alle records van de betreffende searchcode.
Nu wil ik deze tabel weergeven (in draaitabelvorm) in subform2. Alleen lukt dit me niet, als ik bij eigenschappen van subform2 als bronobject de tabel (die voortkomt uit de create-table-query) selecteer zegt access 2003 dat de tabel al in gebruik is.
de volgende code werkt ook niet:
Private Sub txt_CDB_Search_Code_AfterUpdate()
Dim stdocname As String
stdocname = "11_Pivot_Data_Selected_Carrier"
DoCmd.SetWarnings False
DoCmd.OpenQuery stdocname
DoCmd.SetWarnings True
If txt_CDB_Search_Code.Value Is Not Null Then
Me.CDB_subfrm_Pivot.SourceObject = "11_Pivot_Data_Selected_Carrier_Temp"
Else: Me.CDB_subfrm_Pivot.SourceObject = ""
End If
End Sub
Ook zonder het If , Then, Else gebeuren krijg ik dit niet voor elkaar

Wie kan mij helpen?!
Laatst bewerkt: