标题：QQ发送消息测试

1楼

2272585882 发表于：2018/4/8 17:19:52

请问老师，现在是不是不用注册WWSCommon.dll

如果我想测试

Set obj = CreateObject("WWSCommon.TCGroup")
call obj.TransMessage("金字塔自动交易群X", "测试，hello, world! ")
Set obj = Nothing

直接运行这段代码即可？我改过群名称的了，但是运行后没反应，求指导

2楼

yukizzc 发表于：2018/4/8 20:14:39

qq群聊天窗口需要是打开的，然后执行这个程序就可以了

3楼

2272585882 发表于：2018/4/10 10:23:49

确实是打开的

4楼

2272585882 发表于：2018/4/10 10:56:28

对操作系统有要求吗。我在win7,win10都试过，

例如

sub test

Set obj = CreateObject("WWSCommon.TCGroup")
call obj.TransMessage("金字塔自动交易群X", "测试，hello, world! ")
Set obj = Nothing

end sub

然后运行vba 在宏里面执行test

不知道对不对。QQ那边，没反应

5楼

2272585882 发表于：2018/4/10 10:57:05

群名字也改好的了

6楼

guotx2010 发表于：2018/4/15 10:27:50

QQ聊天窗口不能用合并模式，还需要设置Enter键发送，而不是Ctrl+Enter

7楼

2272585882 发表于：2018/4/30 16:09:57

感谢各位大神，最终发现原因是在win10下失败，在win7下可以成功，搞得很嗨，有个qq被封号

8楼

2272585882 发表于：2018/4/30 16:11:36

win10下为何不成功原因不明，如果重新祖册模块，弹出错误提示：注册成功，但是找不到模块什么的。。。。。。。。另外大家注意必须用qq不能用tim

共8 条记录, 每页显示 10 条, 页签: [1]