나눔터  
  HOME > 나눔터 > 묻고답하기 > 액세스
액세스
액세스에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내
작성자:  

 조병민 (boodha1)

추천:  0
파일:     조회:  3777
제목:   [RE]a폼 이벤트로  b폼의 레코드 이동 가능한가요?
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

 - 액세스 버전(95,97,2000,xp,2003,2007): 07

* 아래줄에 질문을 작성하세요 >> 
a폼과 b폼의 레코드 연동 가능한가요?

a과 b폼은 동일한 테이터 레코드입니다. 
a과 b폼 둘다 실행 상태입니다. 

@ 이벤트 = a폼 클릭
@ 조건 =  a폼의 "당근"필드 내용과 일치하는 레코드
          a폼의 "당근"필드 내용이 없을 시에는 이벤트 실행하지 않는다. 

@ 실행 =  a폼의 "당근"필드 내용과 일치하는 레코드로 b폼이 레코드 이동 


==============[조병민님 글에 대한 답변입니다]==============

이벤트는 폼 a 의 품명 클릭에 걸려있습니다.
==============[황동준님 글에 대한 답변입니다]==============
선생님 혹시 같은 조건으로 
엑세스 A파일의 a 폼과
엑세스 B파일의 b 폼 관계로 
a폼 이벤트로 b폼 레코드 이동이 가능한가요?

즉 같은 테이블 참고하는 폼은 동일하지만 파일이 다른경우도
실행이 되는지 궁금합니다. 
감사합니다!
 
[불량 게시물 신고]  
황동준가능은한데 오류 발생될 소지가 많아 추천 드리고 싶진 않습니다.
'첫줄은 아래 클릭이벤트 위에 적어주셔야 합니다.

Private acApp As Access.Application 

Private Sub 품명_Click()

    If Me.NewRecord Or IsNull(품명) Then
    Else
        Dim bDB As String
        bDB = "B파일이름.accdb"
        
        Set acApp = New Access.Application
        acApp.Visible = True
        acApp.OpenCurrentDatabase bDB
        acApp.DoCmd.OpenForm "b"
        acApp.DoCmd.GoToControl "품명"
        acApp.DoCmd.FindRecord Me.품명
    End If

End Sub
09-29 (10:25)
삭제 ■신고
황동준의도하시는 내용을 알수는 없지만, 위 방법 보다 a파일에서 b파일의 테이블을 연결해서 사용하시는게 수월하지 않을까 생각합니다.09-29 (10:28)
삭제 ■신고
조병민아 정말 너무 도움 많이 받고 있습니다. 
제가 배우는 단계라 많이 부족한데 친절히 알려주셔서 정말 감사드립니다!
09-29 (14:53)
삭제 ■신고
        
  

작성일 : 2016-09-29(09:28)
최종수정일 : 2016-09-29(09:28)
 


 ◎ 관련글

  제 목   작성자   날짜
a폼 이벤트로 b폼의 레코드 이동 가능한가요? 조병민 2016-09-27
[RE]a폼 이벤트로  b폼의 레코드 이동 가능한가요? 황동준 2016-09-28
[RE]a폼 이벤트로  b폼의 레코드 이동 가능한가요? 조병민 2016-09-29