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

版权声明:本文为martian6125原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明。
本文链接:https://www.cnblogs.com/martian6125/archive/2011/12/25/9631134.html