以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- QQClient.Send不能发送给分组 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=192519) |
-- 作者:g1j2h3 -- 发布时间:2024/6/29 9:13:00 -- QQClient.Send不能发送给分组 麻烦老师看下下边的代码怎么发送不出去,也没任何提示 Dim r As Row = Tables("出库登记").Current r.Save() QQClient.Send("业务部" & "." & user.Name, "+@|" & r("_Identify") & "|" & r("出库单号") & "|" & User.Name & "|" & "出库登记", True)
|
-- 作者:有点蓝 -- 发布时间:2024/6/29 9:30:00 -- msgbox("业务部" & "." & user.Name)弹出什么内容?这个用户登录了吗? 客户端ReceivedMessage事件写了什么代码接收?使用代码发送的必须到这个事件接收。ReceivedMessage事件第一行放上msgbox(e.Message)看能不能弹出,弹出什么内容? |
-- 作者: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编辑过]
|
-- 作者:有点蓝 -- 发布时间:2024/6/29 10:39:00 -- 那接收人就改为正确的部门和接收名称呀 |
-- 作者:g1j2h3 -- 发布时间:2024/6/29 10:44:00 -- 将来人员名称变了,我是不是要更改代码,这样的话,交付客户使用是不是很不方便啊 [此贴子已经被作者于2024/6/29 10:45:45编辑过]
|
-- 作者:有点蓝 -- 发布时间:2024/6/29 11:08:00 -- 那就建一个类似的权限表,记录什么功能的什么信息需要发给哪个部门哪个用户。然后通过查询获取接收人并发送 |