标题：创建WWSCommon.TCGroup对象报错

Sub APPLICATION_Timer(ID)
      Var1=Document.GetExtData("IFQQ")
      Set tcgroup = CreateObject("WWSCommon.TCGroup")
      Call tcgroup.transmessage("test",content)   
end sub

执行到Set tcgroup = CreateObject("WWSCommon.TCGroup")时提示

编译器错误 429

activeX 部件不能创建对象 "Set tcgroup = CreateObject("WWSCommon.TCGroup")"

 

都是照着例子写的,请帮忙看看是什么问题。

你这代码写的 不大对吧 给个实例

http://www.weistock.com/bbs/dispbbs.asp?boardid=5&ID=11344

谢谢，注册一下dll就可以发信息了。不过还有一个问题，就是在windows7按win+L锁定界面以后，好像就不能通过QQ发消息了，尽管那个QQ聊天界面没关闭。