小弟我在COM里给应用程序发送消息，用VB调用能够成功，用ASP调用则收不到消息

我在COM里给应用程序发送消息，用VB调用能够成功，用ASP调用则收不到消息
HWND   hwndAD_PLAYER;
        hwndAD_PLAYER=FindWindow(NULL, "媒体播放   Port:9335 ");
        if(   hwndAD_PLAYER   !=   0)
        {
                        SendMessage(hwndAD_PLAYER,   WM_MYMSG,   (WPARAM)NULL,   200);
        }


Private   Sub   Command1_Click()

Dim   obj
Dim   aaa
Dim   bbb
Dim   ccc

Set   obj   =   CreateObject( "Project1.ccTestCom ")
aaa   =   "中华人民共和国 "
bbb   =   555
ccc   =   obj.test(aaa,   bbb)
'MsgBox   "b= "   +   Str(bbb),   vbOKOnly

End   Sub

<%
Dim   obj
Dim   aaa  
Dim   bbb  
Dim   ccc

Set   obj   =   CreateObject( "Project1.ccTestCom ")
aaa   =   "中华人民共和国 "
bbb   =   555
ccc   =   obj.test(aaa,bbb)

Response.write   "ccc= "&ccc
Response.write   "bbb= "&bbb
%>

------解决方案--------------------
zjntche_cn(蛋蛋 http://oldbian.blog.sohu.com/):在你的blog上没有发现这方面问题的回复