|
ActiveXForm 으로 만들어서 아래와 같이 하면 메세지 박스가 출력이 되네요..
그렇다면.. 웹페이지에서 스크립트로 ActiveX 컨트롤을 제어할려면 ActiveXForm 이나 ActiveXCtrl
로 만들어야 하나요?
ActiveX Labrary 는 스크립트로 제어를 할 수 없습니까?
둘의 차이가 무엇인지 정말 궁금합니다 T_T
알려주세요..
STDMETHODIMP THelloFormImpl::Testing()
{
try
{
::MessageBox(NULL, "HELLO", "NOTICE", MB_OK);
}
catch(Exception &e)
{
return Error(e.Message.c_str(), IID_IHelloForm);
}
return S_OK;
};
New Document
김성철 님이 쓰신 글 :
: 안녕하세요 빌더로 ActiveX 를 만들어 보려고 합니다.
:
: 제가 작업한 순서는
:
: 1. ActiveX Library 를 만들고
:
: 2. ActiveX Automation 을 만들고
:
: 3. Sum 이란 인터페이스를 만들고
:
: 4. 두수를 더해주는 Sum 이란 메서드를 만들었습니다
:
: 5. 메세지박스를 보여주는 MsgBox 란 메서드를 만들었습니다.
:
: STDMETHODIMP TSumImpl::Sum(long Value_1, long Value_2, long* Value_out)
: {
: *Value_out = Value_1 + Value_2;
: return S_OK;
: }
:
: STDMETHODIMP TSumImpl::MsgBox(BSTR msg)
: {
: ::MessageBox(
: 0, AnsiString(msg).c_str(), "정보 박스", MB_OK);
: return S_OK;
: }
:
: <% 'asp code
:
: Dim objSum
: Dim retSum
:
: Set objSum = Server.CreateObject("paranwave.Sum")
:
: retSum = objSum.Sum(2,1)
:
: Response.Write retSum
:
: '여기서 응답이 없습니다.
: objSum.MsgBox("Hello")
:
: %>
:
:
: 값을 더하는 메서드는 실행이 잘 되서 결과 값이 브라우저에 찍히는데
:
: 메세지 박스는 왜 실행이 안되는지 모르겠습니다.
:
: 제가 ActiveX 를 첨하는지라.. -_-;;
:
: 도와주세요 T_T
|
