Foxtable(狐表)用户栏目专家坐堂 → QQ型没有具体的使用指南,没有使用的代码,不知道有没有调用的方法


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

主题:QQ型没有具体的使用指南,没有使用的代码,不知道有没有调用的方法

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


加好友 发短信
等级:婴狐 帖子:9 积分:638 威望:0 精华:0 注册:2013/11/8 23:27:00
QQ型没有具体的使用指南,没有使用的代码,不知道有没有调用的方法  发帖心情 Post By:2013/12/15 21:53:00 [只看该作者]

QQ型没有具体的使用指南,没有使用的代码,不知道有没有调用的方法
 比如说我在设计的窗口中就不不了!!!请前辈指引,谢谢!

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


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

 输入qq号码,打开qq,点击表的按钮,就可以启动qq对话窗口

 相当于执行下面的代码

Dim Proc As New Process
Proc.File = "tencent://Message/?menu=yes&exe=&uin=13231462" '红色部分为QQ号
Proc.Start()

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


加好友 发短信
等级:婴狐 帖子:9 积分:638 威望:0 精华:0 注册:2013/11/8 23:27:00
  发帖心情 Post By:2013/12/15 21:57:00 [只看该作者]

假如客户表中有100个用户,我在窗口中选到了我想要联系的其中一个用户,我想设计一个按钮能直接调出该客户的QQ聊天窗口,这个代码该怎么写!

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


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

 直接点击 QQ 类型右边的按钮就行了。

 如果是单独一个按钮的话,代码这样写

Dim QQ As String = Tables("xxxxx").Current("xxx列")
Dim Proc As New Process
Proc.File = "tencent://Message/?menu=yes&exe=&uin=" & QQ '红色部分为QQ号
Proc.Start()


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


加好友 发短信
等级:婴狐 帖子:9 积分:638 威望:0 精华:0 注册:2013/11/8 23:27:00
  发帖心情 Post By:2013/12/16 21:00:00 [只看该作者]

是的,确实能正常打开!
[此贴子已经被作者于2013-12-16 21:02:02编辑过]

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


加好友 发短信
等级:幼狐 帖子:142 积分:1649 威望:0 精华:0 注册:2014/5/3 14:52:00
  发帖心情 Post By:2015/9/27 3:21:00 [只看该作者]

xxxxx  是什么意思?怎么讲?


 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1964 积分:15604 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2015/9/27 5:18:00 [只看该作者]

Tables("xxxxx").Current("xxx列") 前一个XXXXX是表名,后一个XXX是列名,xxxxx这个表xxx列是存放QQ号码的

 回到顶部