记录用友ERP二次开发全过程(转载)

记录用友ERP二次开发全过程

以此为备忘录。

最好在机器上装好U8。

下一步把自定义权限及模块加入U8里,以方便外部程序调用,识别!

function erpLogin:boolean;

var loginObject:OleVariant;

      bRetVal:boolean;

begin

try

loginObject:= CreateOleObject('UFSoft.U8.Framework.Login.UI.clsLogin');
if loginObject.login_2('DP') then
begin
  ///登陆成功

bRetVal:=true;
end else
begin
  //登陆失败

bRetVal:=false;

end;

except

bRetVal:=false;

end;

erpLogin:=bRetVal;

end;

posted on 2011-12-25 19:44  martian6125  阅读(706)  评论(0编辑  收藏  举报