Foxtable(狐表)用户栏目专家坐堂 → [求助]目录树排序及用目录树打开外网QQ


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

主题:[求助]目录树排序及用目录树打开外网QQ

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/7/28 15:39:00 [显示全部帖子]

1.http://www.foxtable.com/webhelp/scr/0894.htm

trv.BuildTree("表A","部门|姓名|QQ","","序号")

2.
Dim Proc As New Process
Proc.File = "tencent://message/?uin=12345678"   '好友的QQ号
Proc.Start()

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/7/28 16:46:00 [显示全部帖子]

测试没有问题,上面红色字改为联系人qq号即可

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/7/28 16:48:00 [显示全部帖子]

假如树节点是qq号码

Dim Proc As New Process
Proc.File = "tencent://message/?uin=" & e.Node.Text   '好友的QQ号
Proc.Start()

 回到顶部