起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 189|回复: 5

【结贴】取所有人员**

[复制链接]
发表于 2009-1-14 21:42:28 | 显示全部楼层 |阅读模式
我要取组织机构下某岗位的所有人员,怎么取?所有人员取出来后,放在那儿,放在数组中吗?,怎么实现?
回复

使用道具 举报

发表于 2009-1-15 08:44:09 | 显示全部楼层
//取岗位下的人员的示例代码
procedure TMainForm.Button1Click(Sender: TObject);
var
   Os:Business.Model.Org.TOrgSystem;
   olist:Business.Model.Org.TOrgURLs;
   i:integer;
begin
     olist:= Business.Model.Org.TOrgURLs.Create;
     os:=   Business.Model.Org.TOrgSystem.Create;
     os.GetOrgURLsByOrgExpr('OrgChildren(OrgSelect(orgcondition(''gw1.ptm'', '''', '''')), '''', False, False)',olist);
     for i:=0 to olist.Count-1 do
     begin
          memo1.Lines.add(olist.BizURL.URL);
     end;
     os.free;
     olist.free;
end;
回复 支持 反对

使用道具 举报

发表于 2009-1-15 08:51:49 | 显示全部楼层
回复 支持 反对

使用道具 举报

 楼主| 发表于 2009-1-15 10:17:42 | 显示全部楼层
谢谢!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2009-1-15 10:26:35 | 显示全部楼层
现在想由人员的bizurl获得人员的id,然后再定位到人员的名字?怎么实现呢?
回复 支持 反对

使用道具 举报

发表于 2009-1-15 10:26:48 | 显示全部楼层
客气,结贴。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-28 09:42 , Processed in 0.039277 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表