如何用代码发通知给某个部门所有人**

dupit · 发表于 2007-9-25 11:14:36

如何用代码发通知给某个部门所有人

lixy · 发表于 2007-9-25 11:19:35

http://bbs.justep.com/forum.php?mod=viewthread&tid=2920

dupit · 发表于 2007-9-25 14:44:14

好象这个是要指定到人的?不指定到人可以吗

atiger · 发表于 2007-9-25 15:01:09

当然可以，你试试麻

dupit · 发表于 2007-9-25 15:50:34

改成
IOrgURL:=TOrgURL.Create('XYBM','','');
  ITask.SenderDeptID:='XYBM'';
  ITask.SenderPositionID:='';
  ITask.SenderID:='';
没有错误但是没通知产生

yancm · 发表于 2007-9-25 15:56:05

楼主，SenderPositionID和ITask.SenderID是指发消息的人，你要写明啊，不能为空的。

atiger · 发表于 2007-9-25 16:00:27

你跟踪代码了麻？执行到这些代码没有

还有，这些都写了吧
begin
   lTask.TaskMessages.AddTaskMessage(nil, lOrgURl,
   TTaskmessagestate.tmsSend, 0, False);
   //添加到任务消息列表里
   Flow.FlowEngine.SaveTask(lTask); //保存任务
end

dupit · 发表于 2007-9-25 16:05:44

最初由 atiger 发布
[B]你跟踪代码了麻？执行到这些代码没有

还有，这些都写了吧
begin
lTask.TaskMessages.AddTaskMessage(nil, lOrgURl,
TTaskmessagestate.tmsSend, 0, ..

以下省略...... [/B]

这些都写了我在试试看

dupit · 发表于 2007-9-25 16:19:59

ITask:=TTask.Create;
  IOrgURL:=TOrgURL.Create('XYBM','','');
  ITask.Subject:='领料通知:' ;
  ITask.Kind:='ftkNotify';
  ITask.SenderDeptID:='YWBM';
  ITask.SenderPositionID:='YWGW';
  ITask.SenderID:=YWY;
  try
  begin
  ITask.TaskMessages.AddTaskMessage(nil,IOrgURL,TTaskMessagestate.tmsSend,0,false);
  Flow.FlowEngine.SaveTask(ITask);
  JsDialogs.ShowMsg('通知已经发出','确定');
  end;
  Finally
  ITask.Free;
  end;
代码是这样还是没有通知产生
  IOrgURL:=TOrgURL.Create('XYBM','','');这样指定可以不

atiger · 发表于 2007-9-25 16:24:54

可以，XYBM 这个是部门的ID？

		自动登录	找回密码
密码			立即注册