Foxtable(狐表)用户栏目专家坐堂 → QQ发送信息


  共有2366人关注过本帖树形打印复制链接

主题:QQ发送信息

帅哥哟,离线,有人找我吗?
lihe60
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6885 积分:43595 威望:0 精华:0 注册:2009/3/2 14:07:00
QQ发送信息  发帖心情 Post By:2018/12/30 14:42:00 [只看该作者]

在狐表中,可以给一个指定的QQ号发送信息,如何获取发送信息人的QQ号?

If not e.Row.IsNull("qq") Then
    Dim Proc As New Process
    Proc.File = "tencent://message/?uin=" & e.Row("QQ")
    Proc.Start
    System.Threading.Thread.Sleep(5000)   '等候几秒,让窗口打开
    Sendkeys.SendWait(e.Row("信息内容"))
    Sendkeys.Send("^~")   '回车
    e.Cancel = True
End If

[此贴子已经被作者于2018/12/30 14:44:54编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/12/30 17:54:00 [只看该作者]

这个无法获取的。你当前电脑登陆的是谁,就是谁。

 回到顶部
帅哥哟,离线,有人找我吗?
lihe60
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6885 积分:43595 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2018/12/30 18:48:00 [只看该作者]

在PC端,每个人都可以登录的,想知道是谁在发信息。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/12/30 18:52:00 [只看该作者]

以下是引用lihe60在2018/12/30 18:48:00的发言:
在PC端,每个人都可以登录的,想知道是谁在发信息。

 

操作的是你现在pc电脑上已经登陆的那个QQ。

 

而且这个发送,是模拟发送,意思是调出聊天窗口,然后发信息。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/12/30 18:53:00 [只看该作者]

qq没有开放的发送信息的接口。

 回到顶部