2010-01-06 3 views
1

SQL의 일부 데이터를 가져 오는 데 사용되는 Access 데이터베이스를 상속 받았습니다. MDB는 모달 모드에서 양식과 함께 열립니다. 액세스 메뉴 바 또는 단추가 표시됩니다. Visual Studio의 데이터 연결 도구를 사용하여 내용이있는 테이블을 볼 수 있지만 모듈의 코드를 볼 수 없습니다.모달 형식의 액세스 및 액세스 모듈 코드

여기 나는이 question을 보았지만 거기에 대한 답변은 실제로 필요한 것이 아닙니다. 양식을 닫고 (및 모듈에 액세스하는) 강제로 또는 VBA 코드를 추출 할 수있는 방법이 있습니까?

[편집] Access 2007을 사용하고 있습니다. 원래 개발자가 사용했던 것이 확실하지 않습니다.

+0

그런데 어떤 버전의 Access가 필요합니까? –

답변

2

데이터베이스를 열 때 Shift 키를 누르고 계십시오. 이렇게하면 실행중인 자동 스크립트가로드되지 않고 테이블, 쿼리 및 VBA 스크립트에 액세스 할 수 있습니다.

+0

귀하의 대답은 시작 바이 패스 키가 비활성화되어 있지 않은 것으로 가정합니다. 그러나 쉽게 뒤집을 수 있습니다. –

+0

나는 그것에 익숙하지 않다. 시작 바이 패스 키가 비활성화 된 경우이를 활성화하는 방법은 무엇입니까? –

+0

감사합니다. 나는 성공하지 않고 이것을 시도했다. '시작'에서 Access는 RunCode에서 '작업 실패'오류를 발생시킵니다. 내가 할 수있는 일은 '모든 매크로 멈춤'입니다. 아무 것도 클릭하지 않으면 액세스의 기본 '보안 경고'바만 나타납니다. '이 콘텐츠 사용'을 선택하면 모든 메뉴 막대를 숨기는 등의 양식이 표시됩니다.이 모든 작업은 Shift 키를 누른 상태에서 수행됩니다. – edosoft

0

edosoft의 의견에 대한 답변으로 Michael Todd의 답변에 대한 다소 긴 부록 또는 의견입니다.

내용을 선택하는 대신 시작 옵션 ((파일 -> 옵션 -> 현재 데이터베이스 -> 표시 양식) 또는 (도구 -> 시작 -> 표시 양식)을 확인하고 양식 이름, 메모를 작성한 다음 전체 메뉴 허용 (동일한 페이지)에 체크 표시를하십시오. Alt + F11을 눌러 코드를 표시하고 시작 코드를 확인한 다음 마지막으로 AutoRun 매크로가 있는지 확인하고 이름을 바꿀 수 있습니다.

EDIT 다시는 이와 같은 코드는 MDB의 전체 이름과 경로를 사용하여 다른 MDB에서 실행 될 수

당신은 예를 들어, 시작 양식을 변경하기 위해 MDB를 열 필요가 없습니다 댓글 당신 변경하고 싶다.

Sub SetStartForm(DBFile As String) 
Dim prp As Object 
Dim db As Database 

Const PROPERTY_NOT_FOUND As Integer = 3270 

    Set db = OpenDatabase(DBFile) 

    db.Properties("StartupForm") = "(none)" 

    If Err.Number > 0 Then 
     If Err.Number = PROPERTY_NOT_FOUND Then 
      '' Create the new property, but this is not relevant in this case 
     End If 
    End If 

    db.Close 
    Set db = Nothing 
    Set prp = Nothing 
End Sub 
+0

문제는 양식 (또는 코드)이 모든 메뉴 막대를 숨기므로 파일 -> 옵션을 사용할 수 없기 때문입니다. 나는 성공하지 않고 Alt + F11을 시도했다 : ( – edosoft

+1

데이터베이스가 완전히 열리고 내용을 사용하도록 선택하지 않을 때까지 Shift 키를 누르고 있어도 양식이 표시된다고합니까? – Fionnuala

+0

예. 내가 말하는 바는 – edosoft