记录用友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;

转载于:https://www.cnblogs.com/martian6125/archive/2011/12/25/9631134.html

你可能感兴趣的:(记录用友ERP二次开发全过程(转载))