vbs의 예법의 13
개요
vbs의 예법을 조사해 봤습니다.
vc++로com 서버를 만들어 보았습니다.
사진.
컨디션
windows vista
visual studio 2010
절차.
MFC 애플리케이션 제작
고급 기능의 자동화를 선택합니다.(중요)
클래스 보기에서 VCOdeIPLlibrary를 선택하고 메서드를 추가합니다.
BYTE에서 반환된 ok와 void에서 반환된 매개변수는 BSTR의 TEXT1을 생성합니다.
함수의 내용을 쓰다.BYTE COhicompo1DlgAutoProxy::ok(void)
{
AFX_MANAGE_STATE(AfxGetAppModuleState());
// TODO: ここにディスパッチ ハンドラー コードを追加してください。
return m_pDialog->flg;
}
void COhicompo1DlgAutoProxy::text1(LPCTSTR str)
{
AFX_MANAGE_STATE(AfxGetAppModuleState());
// TODO: ここにディスパッチ ハンドラー コードを追加してください。
CString s;
s.Format(_T("%s"), (LPCTSTR) str);
((CEdit *) m_pDialog->GetDlgItem(IDC_EDIT1))->SetWindowText(s);
}
등록표에 등록하다.
완료된 EXE는 관리자가 수행합니다.
테스트 코드
vbs로 해봐.Dim App
Dim flg
Set App = Createobject("Ohicompo1.Application")
App.text1("こんにちわ せかい")
flg = 3
Do
WScript.Sleep(200)
if App.ok() = 1 then
flg = 0
end if
Loop until flg = 0
Set App = Nothing
이상.
Reference
이 문제에 관하여(vbs의 예법의 13), 우리는 이곳에서 더 많은 자료를 발견하고 링크를 클릭하여 보았다
https://qiita.com/ohisama@github/items/4404ff79dd70322e681a
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
우수한 개발자 콘텐츠 발견에 전념
(Collection and Share based on the CC Protocol.)
![](https://s1.md5.ltd/image/5af329c93ad66fc618115aba7294bf2a.png)
컨디션
windows vista
visual studio 2010
절차.
MFC 애플리케이션 제작
고급 기능의 자동화를 선택합니다.(중요)
클래스 보기에서 VCOdeIPLlibrary를 선택하고 메서드를 추가합니다.
BYTE에서 반환된 ok와 void에서 반환된 매개변수는 BSTR의 TEXT1을 생성합니다.
함수의 내용을 쓰다.BYTE COhicompo1DlgAutoProxy::ok(void)
{
AFX_MANAGE_STATE(AfxGetAppModuleState());
// TODO: ここにディスパッチ ハンドラー コードを追加してください。
return m_pDialog->flg;
}
void COhicompo1DlgAutoProxy::text1(LPCTSTR str)
{
AFX_MANAGE_STATE(AfxGetAppModuleState());
// TODO: ここにディスパッチ ハンドラー コードを追加してください。
CString s;
s.Format(_T("%s"), (LPCTSTR) str);
((CEdit *) m_pDialog->GetDlgItem(IDC_EDIT1))->SetWindowText(s);
}
등록표에 등록하다.
완료된 EXE는 관리자가 수행합니다.
테스트 코드
vbs로 해봐.Dim App
Dim flg
Set App = Createobject("Ohicompo1.Application")
App.text1("こんにちわ せかい")
flg = 3
Do
WScript.Sleep(200)
if App.ok() = 1 then
flg = 0
end if
Loop until flg = 0
Set App = Nothing
이상.
Reference
이 문제에 관하여(vbs의 예법의 13), 우리는 이곳에서 더 많은 자료를 발견하고 링크를 클릭하여 보았다
https://qiita.com/ohisama@github/items/4404ff79dd70322e681a
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
우수한 개발자 콘텐츠 발견에 전념
(Collection and Share based on the CC Protocol.)
MFC 애플리케이션 제작
고급 기능의 자동화를 선택합니다.(중요)
클래스 보기에서 VCOdeIPLlibrary를 선택하고 메서드를 추가합니다.
BYTE에서 반환된 ok와 void에서 반환된 매개변수는 BSTR의 TEXT1을 생성합니다.
함수의 내용을 쓰다.
BYTE COhicompo1DlgAutoProxy::ok(void)
{
AFX_MANAGE_STATE(AfxGetAppModuleState());
// TODO: ここにディスパッチ ハンドラー コードを追加してください。
return m_pDialog->flg;
}
void COhicompo1DlgAutoProxy::text1(LPCTSTR str)
{
AFX_MANAGE_STATE(AfxGetAppModuleState());
// TODO: ここにディスパッチ ハンドラー コードを追加してください。
CString s;
s.Format(_T("%s"), (LPCTSTR) str);
((CEdit *) m_pDialog->GetDlgItem(IDC_EDIT1))->SetWindowText(s);
}
등록표에 등록하다.완료된 EXE는 관리자가 수행합니다.
테스트 코드
vbs로 해봐.Dim App
Dim flg
Set App = Createobject("Ohicompo1.Application")
App.text1("こんにちわ せかい")
flg = 3
Do
WScript.Sleep(200)
if App.ok() = 1 then
flg = 0
end if
Loop until flg = 0
Set App = Nothing
이상.
Reference
이 문제에 관하여(vbs의 예법의 13), 우리는 이곳에서 더 많은 자료를 발견하고 링크를 클릭하여 보았다
https://qiita.com/ohisama@github/items/4404ff79dd70322e681a
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
우수한 개발자 콘텐츠 발견에 전념
(Collection and Share based on the CC Protocol.)
Dim App
Dim flg
Set App = Createobject("Ohicompo1.Application")
App.text1("こんにちわ せかい")
flg = 3
Do
WScript.Sleep(200)
if App.ok() = 1 then
flg = 0
end if
Loop until flg = 0
Set App = Nothing
Reference
이 문제에 관하여(vbs의 예법의 13), 우리는 이곳에서 더 많은 자료를 발견하고 링크를 클릭하여 보았다 https://qiita.com/ohisama@github/items/4404ff79dd70322e681a텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
우수한 개발자 콘텐츠 발견에 전념
(Collection and Share based on the CC Protocol.)