Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共6 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:QQClient.Send不能发送给分组

1楼
g1j2h3 发表于:2024/6/29 9:13:00
麻烦老师看下下边的代码怎么发送不出去,也没任何提示
Dim r As Row = Tables("出库登记").Current
r.Save()
QQClient.Send("业务部" & "." & user.Name, "+@|" & r("_Identify") & "|" & r("出库单号") & "|" & User.Name & "|" & "出库登记", True)
2楼
有点蓝 发表于:2024/6/29 9:30:00
msgbox("业务部" & "." & user.Name)弹出什么内容?这个用户登录了吗?

客户端ReceivedMessage事件写了什么代码接收?使用代码发送的必须到这个事件接收。ReceivedMessage事件第一行放上msgbox(e.Message)看能不能弹出,弹出什么内容?
3楼
g1j2h3 发表于:2024/6/29 9:40:00
QQClient.Send("业务部" & "." & user.Name, "+@|" & r("_Identify") & "|" & r("出库单号") & "|" & User.Name & "|" & "出库登记", True)
前面的名字不是业务部人员的名字,他和后边的名字一样
QQClient.Send("业务部.张三", "+@|" & r("_Identify") & "|" & r("出库单号") & "|" & User.Name & "|" & "出库登记", True)
这样可以发送
[此贴子已经被作者于2024/6/29 10:43:11编辑过]
4楼
有点蓝 发表于:2024/6/29 10:39:00
那接收人就改为正确的部门和接收名称呀
5楼
g1j2h3 发表于:2024/6/29 10:44:00
将来人员名称变了,我是不是要更改代码,这样的话,交付客户使用是不是很不方便啊
[此贴子已经被作者于2024/6/29 10:45:45编辑过]
6楼
有点蓝 发表于:2024/6/29 11:08:00
那就建一个类似的权限表,记录什么功能的什么信息需要发给哪个部门哪个用户。然后通过查询获取接收人并发送
共6 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.