|
|
|
| |
|
|
| |
안녕하세요? 여러가지 쿼리가 있는데, 특정쿼리 선택후 조회를 하고난후 방금 실행한 쿼리를 초기화(특정 조건해제)하고 싶은데, 어떤 방법이 있을까요?
Docmd.close acquery"A" 형태는 아닌것 같네요..
고수님들의 조언을 필요로 합니다.
==============[변사또님 글에 대한 답변입니다]==============
다음은 QueryDef를 사용하여 쿼리로 조건을 주어 검색하고 그 결과를 리스트박스의 RowSource로 사용하고 다시 조건을 해지하여 초기화하는 코드입니다.이 QueryDef로 사용하는 쿼리는 조건을 주지않은 상태로 작성합니다.
Private Sub 업체코드검색_Click()
Dim strA As String
Dim MyDB As Database
Dim MyQ As QueryDef
Set MyDB = CurrentDb
Set MyQ = MyDB.QueryDefs("Q_검색")
strA="조건(Where절)을 붙인 SQL"
MyQ.SQL = strA
목록.RowSource = "Q_검색"
End Sub
Private Sub 필터해제_Click()
Dim strA As String
Dim MyDB As Database
Dim MyQ As QueryDef
Set MyDB = CurrentDb
Set MyQ = MyDB.QueryDefs("Q_검색")
strA = "Where절이 없는 원래의 SQL"
MyQ.SQL = strA
목록.RowSource = "Q_검색"
End Sub
|
|
|
[불량 게시물 신고] |
|
|
|
|
작성일 : 2008-09-30(13:14)
최종수정일 : 2008-09-30(13:14) |
| |
    |
 
  |
|
액세스에 대한 질문과
답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
