以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]Open QQ 怎么推送选中行信息到  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=144150)
--  作者：liumiao123
--  发布时间：2019/12/12 11:06:00
--  [求助]Open QQ 怎么推送选中行信息到
请问老师，如何修改成 ·选择行·直接发送给对应 ·姓名·用户OPEN QQ上
意思是·采购部门有很多员工·选择哪行·直接发到对应姓名那

If MessageBox.Show(" 是否导提交到采购部门 !","提示",MessageBoxButtons.YesNo)=DialogResult.Yes Then
Dim r As Row  = Tables("采购订单表").Current
r.Save()
QQClient.Send("供应部.采购","+@|" & r("_Identify") & "|" & r("订单编号") & "|" & User.Name & "|采购订单表" ,True)
End If

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20191212110410.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2019/12/12 11:06:51编辑过]
--  作者：有点蓝
--  发布时间：2019/12/12 11:10:00
--  
QQClient.Send("供应部." & r("姓名"),"+@|" & r("_Identify") & "|" & r("订单编号") & "|" & User.Name & "|采购订单表" ,True)