以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]QQopen问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142726)

--  作者:ezilu
--  发布时间:2019/11/4 18:58:00
--  [求助]QQopen问题
根据官网帮助的“自定义流程通知窗口
实现 申请--审核--批准  功能
按照帮助的代码  可以实现审核通过
但是我现在想 把  审核通过的申请  再往上一级 申请 批准

Dim sqry As String = e.Form.Controls("申请人员").Value \'申请人员
Dim shry As String = e.Form.Controls("审核人员").Value \'审核人员
Dim pzry As String = e.Form.Controls("批准人员").Value \'批准人员

Dim r As Row  = Tables("审批").Current
r("审核日期") = Date.Today
r("审批状态") = "批准中"
r.Save()
\'发送申请批准的消息
QQClient.Send(pzry,"+pz|" & r("_Identify") & "|" & r("申请单号") & "|" & shry,True)
\'发送审核通过的消息
QQClient.Send(sqry,"-sh|" & r("申请单号") & "|" & shry,True)

反复测试  好像是红色这句代码 没有发出msg到批准人员的客户端,是不能同时执行两个send功能吗

--  作者:有点蓝
--  发布时间:2019/11/4 20:37:00
--  
能同时执行两个send的

接收申请批准的消息代码是怎么处理的?