2011-07-26 6 views
0

================================== 편집에서 콤보 목록 프로그래밍 채우기 = =================ACCESS 2007 - DB를 표

몇 가지 오류가있어서 다음과 같이 수정했습니다. :

Me.ADComponentNumber.RowSource = "SELECT [Components].[ID], [Components].[ComponentNumber] FROM Components WHERE [Components].[Items_Id] = " + Me.ADItemNumber.Column(0) + " ORDER BY [Components].[ComponentNumber]" 

========================================= ================

Db 테이블에서 프로그래밍 방식으로 콤보 목록을 채우고 싶었습니다. 나는 행 원본까지 설정과 같은 몇 가지를 시도했다, 그러나 그것은 작동하지 않습니다. 아래 코드를 참조하십시오 :

// Basically when a user selects an item form `Item Number` combo list 
// The `ADItemNumber_Change()` function is supposed to get the `Item.ID` (Column(0)) number 
// and feed it to the `ADComponentNumber.RowSource`, which is then supposed to 
// fill the list with Components whose `Components.Item_ID` fields matches `Item.ID` number. 
// NOTHING IS GETTING FILLED OUT IN THE LIST... 
Private Sub ADItemNumber_Change() 
    Me.ADComponentNumber.RowSource = vbNullString 
    Me.ADComponentNumber.RowSourceType = "Table/Query" 
    Me.ADComponentNumber.RowSource = "SELECT [Components].[ID], [Components].[ComponentsNumber] FROM Components WHERE [Components].[Items_Id] = Me.ADItemNumber.Column(0) ORDER BY [Components].[ComponentNumber]" 
    Me.Refresh 
End Sub 

나는 그것이 작동되도록하기 위해 뭔가를 놓치고 있습니다.

감사합니다.

답변

0

내 문제를 해결할 수있었습니다. 내 질문에 EDIT 섹션을 참조하십시오