Microsoft MVP성태의 닷넷 이야기
VC++: 90. Visual Studio 2013에서 Visual Basic 6용 ATL Control 제작 [링크 복사], [링크+제목 복사],
조회: 13679
글쓴 사람
정성태 (techsharer at outlook.com)
홈페이지
첨부 파일
 

Visual Studio 2013에서 Visual Basic 6용 ATL Control 제작

이상하군요. Visual Studio 2013에서 생성한 ATL Control의 경우, 해당 컨트롤을 Visual Basic 6의 도구 상자에 구성 요소로 등록 시 로드할 수 없다는 오류가 발생합니다.

vb6_with_vs2013_1.png

'...' could not be loaded.

테스트 삼아서 예전 버전인 Visual Studio 2005에서 ATL Control 프로젝트를 만들어 빌드하면 이런 현상이 없습니다.

차이점을 살펴보면 답이 나오겠지요? ^^ 우선, Visual Studio 2013에서 생성한 ATL 프로젝트의 경우 추가된 컨트롤의 .rgs 파일에 ProgID 관련한 내용이 없습니다. 따라서, 다음의 내용을 수작업으로 추가해 주시면 됩니다.

HKCR
{
    TestCtrl.FakeLabel.1 = s 'FakeLabel Class'
    {
        CLSID = s '{A43EF5B0-98B1-4D0B-9444-F6BB987AA37A}'
    }
    TestCtrl.FakeLabel = s 'FakeLabel Class'
    {
        CLSID = s '{A43EF5B0-98B1-4D0B-9444-F6BB987AA37A}'
        CurVer = s 'TestCtrl.FakeLabel.1'
    }

    NoRemove CLSID
    {
        ForceRemove {A43EF5B0-98B1-4D0B-9444-F6BB987AA37A} = s 'FakeLabel Class'
        {
            ProgID = s 'TestCtrl.FakeLabel.1'
            VersionIndependentProgID = s 'TestCtrl.FakeLabel'
            
            ForceRemove Programmable
            InprocServer32 = s '%MODULE%'
            {
                val ThreadingModel = s 'Apartment'
            }

            val AppID = s '%APPID%'

            ForceRemove Control
            ForceRemove 'ToolboxBitmap32' = s '%MODULE%, 106'
            MiscStatus = s '0'
            {
                '1' = s '%OLEMISC%'
            }
            TypeLib = s '{78DF6D83-EE4E-49B0-8C23-EE3E22FCF158}'
            Version = s '1.0'
        }
    }
}

이렇게 해주면 VB 개발환경의 도구 상자 탭에 오류없이 잘 등록이 됩니다. 그런데, 문제가 하나 더 있습니다. 다름 아닌, 도구 상자에서 선택해 VB Form에 얹어 놓을 때 다시 오류가 발생합니다.

System Error &H80004005 (-2147467259).

0x80004005 == Unspecified error 

이건 IPersistStreamInit 인터페이스 구현이 없어서 그런 것입니다. 따라서 컨트롤 소스 코드의 헤더 파일에 이와 관련한 인터페이스를 추가해 주면 됩니다.

// ... [생략] ...

class ATL_NO_VTABLE CFakeLabel :
    public CComObjectRootEx<CComSingleThreadModel>,
    public IDispatchImpl<IFakeLabel, &IID_IFakeLabel, &LIBID_TestCtrlLib, /*wMajor =*/ 1, /*wMinor =*/ 0>,

    public IPersistStreamInitImpl<CFakeLabel>,

    public IOleControlImpl<CFakeLabel>,
    public IOleObjectImpl<CFakeLabel>,
    // ... [생략] ...
{
    // ... [생략] ...

BEGIN_COM_MAP(CFakeLabel)
    COM_INTERFACE_ENTRY(IFakeLabel)
    COM_INTERFACE_ENTRY(IDispatch)
    
    // ... [생략] ...
    COM_INTERFACE_ENTRY(IOleObject)

    COM_INTERFACE_ENTRY(IPersistStreamInit)
    COM_INTERFACE_ENTRY2(IPersist, IPersistStreamInit)

    COM_INTERFACE_ENTRY(ISupportErrorInfo)
    COM_INTERFACE_ENTRY(IConnectionPointContainer)
    // ... [생략] ...
END_COM_MAP()

    // ... [생략] ...
}




그 외에 한가지 더!

Visual Studio 2013의 Visual C++ 프로젝트의 경우 "Platform Toolset"의 기본 값이 "Visual Studio 2013 (v120)"로 되어 있는데요. 대개의 경우, Visual Basic 6 응용 프로그램을 아직도 쓰는 곳이라면 XP 이하의 버전일 가능성이 큽니다. 따라서, "Platform Toolset" 값을 "Visual Studio 2013 - Windows XP (v120_xp)"로 바꿔주는 것이 안전합니다. 그렇지 않으면 Windows Server XP/2003에서 regsvr32.exe로 등록 시 "LoadLibrary(...) failed - The specified procedure could not be found."라는 오류 메시지가 뜨면서 등록이 실패합니다.




[이 글에 대해서 여러분들과 의견을 공유하고 싶습니다. 틀리거나 미흡한 부분 또는 의문 사항이 있으시면 언제든 댓글 남겨주십시오.]







[최초 등록일: ]
[최종 수정일: 7/10/2021]

Creative Commons License
이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이센스에 따라 이용하실 수 있습니다.
by SeongTae Jeong, mailto:techsharer at outlook.com

비밀번호

댓글 작성자
 




... 46  47  48  49  50  51  52  53  54  55  56  [57]  58  59  60  ...
NoWriterDateCnt.TitleFile(s)
12201정성태3/18/202010836오류 유형: 611. git-credential-manager.exe: Using credentials for username "Personal Access Token". [1]
12200정성태3/18/202011289VS.NET IDE: 145. NuGet + Github 라이브러리 디버깅 관련 옵션 3가지 - "Enable Just My Code" / "Enable Source Link support" / "Suppress JIT optimization on module load (Managed only)"
12199정성태3/17/20209145오류 유형: 610. C# - CodeDomProvider 사용 시 Unhandled Exception: System.IO.DirectoryNotFoundException: Could not find a part of the path '...\f2_6uod0.tmp'.
12198정성태3/17/202011855오류 유형: 609. SQL 서버 접속 시 "Cannot open user default database. Login failed."
12197정성태3/17/202011002VS.NET IDE: 144. .NET Core 콘솔 응용 프로그램을 배포(publish) 시 docker image 자동 생성 - 두 번째 이야기 [1]
12196정성태3/17/20208922오류 유형: 608. The ServicedComponent being invoked is not correctly configured (Use regsvcs to re-register).
12195정성태3/16/202010656.NET Framework: 902. C# - 프로세스의 모든 핸들을 열람 - 세 번째 이야기
12194정성태3/16/202012986오류 유형: 607. PostgreSQL - Npgsql.NpgsqlException: sorry, too many clients already
12193정성태3/16/20209602개발 환경 구성: 485. docker - SAP Adaptive Server Enterprise 컨테이너 실행 [1]
12192정성태3/14/202012070개발 환경 구성: 484. docker - Sybase Anywhere 16 컨테이너 실행
12191정성태3/14/202012437개발 환경 구성: 483. docker - OracleXE 컨테이너 실행 [1]
12190정성태3/14/20208597오류 유형: 606. Docker Desktop 업그레이드 시 "The process cannot access the file 'C:\Program Files\Docker\Docker\resources\dockerd.exe' because it is being used by another process."
12189정성태3/13/202013442개발 환경 구성: 482. Facebook OAuth 처리 시 상태 정보 전달 방법과 "유효한 OAuth 리디렉션 URI" 설정 규칙
12188정성태3/13/202015644Windows: 169. 부팅 시점에 실행되는 chkdsk 결과를 확인하는 방법
12187정성태3/12/20208394오류 유형: 605. NtpClient was unable to set a manual peer to use as a time source because of duplicate error on '...'.
12186정성태3/12/20209471오류 유형: 604. The SysVol Permissions for one or more GPOs on this domain controller and not in sync with the permissions for the GPOs on the Baseline domain controller.
12185정성태3/11/202010129오류 유형: 603. The browser service was unable to retrieve a list of servers from the browser master...
12184정성태3/11/202011585오류 유형: 602. Automatic certificate enrollment for local system failed (0x800706ba) The RPC server is unavailable. [3]
12183정성태3/11/20209938오류 유형: 601. Warning: DsGetDcName returned information for \\[...], when we were trying to reach [...].
12182정성태3/11/202011143.NET Framework: 901. C# Windows Forms - Vista/7 이후의 Progress Bar 업데이트가 느린 문제파일 다운로드1
12181정성태3/11/202011956기타: 76. 재현 가능한 최소한의 예제 프로젝트란? - 두 번째 예제파일 다운로드1
12180정성태3/10/20208568오류 유형: 600. "Docker Desktop for Windows" - EXPOSE 포트가 LISTENING 되지 않는 문제
12179정성태3/10/202019975개발 환경 구성: 481. docker - PostgreSQL 컨테이너 실행
12178정성태3/10/202011465개발 환경 구성: 480. Linux 운영체제의 docker를 위한 tcp 바인딩 추가 [1]
12177정성태3/9/202011114개발 환경 구성: 479. docker - MySQL 컨테이너 실행
12176정성태3/9/202010528개발 환경 구성: 478. 파일의 (sha256 등의) 해시 값(checksum) 확인하는 방법
... 46  47  48  49  50  51  52  53  54  55  56  [57]  58  59  60  ...