전경 메시지 상자를 강제로

Question

나는 Visual FoxPro 인스턴스를 호출하고 VFP 프로그램을 실행하는 VBScript 있어요. 이 프로그램의 일부는 메시지 상자를 생성합니다. 그러나 내 스크립트가 명령 프롬프트가 아닌 Windows GUI에서 실행되는 경우 생성 된 메시지 상자가 반드시 포 그라운드로 향하는 것은 아닙니다.

Set oVFP = CreateObject("VisualFoxPro.Application") 
oVFP.DoCmd("Messagebox('Hello World')") 
Set oVFP = Nothing 

나는 DOS 프롬프트에서이 스크립트를 실행

는 메시지 상자가 전경에 팝업 : VBScript로

나는 다음과 같은 코드가 있습니다. 탐색기에서 스크립트를 두 번 클릭하면 탐색기 창이 생성 된 메시지 상자를 덮고있을 수 있습니다. 메시지 상자가 사용자 동작을 기다리는 탐색기 창 뒤에 숨어 있다는 표시는 없습니다 (예 : 시작 막대에 추가 단추가 없음).

생성 된 메시지 상자를 강제로 포 그라운드로 보낼 수 있습니까?

Answer 1

메시지 박스 옵션에 문서화되지 않은 '시스템 모달'플래그를 추가

Set oVFP = CreateObject("VisualFoxPro.Application") 
oVFP.DoCmd("Messagebox('Hello World', 4096)") 
Set oVFP = Nothing