用友二次开发 用友控件 Js宿主脚本 调用用友T6 登录 参照 控件示例

用友二次开发 用友控件 Js宿主脚本 调用用友T6 登录 参照 控件示例

/*****************************************

,  code by 张朋 

'  Email: [email protected]

'  2011-8-29

******************************************/

var g_oLogin = new ActiveXObject("U8Login.clsLogin");

g_oLogin.ClearError();//清除错误!

var Result = g_oLogin.Login("DP"); //登录模块 用DP就可得到一个正式版的模块权限。其它参数均可默认。成功返回True；失败返回False。

WScript.Echo( g_oLogin.UfDbName);//显示连接字符串

//var clsProductFacade=  new ActiveXObject("XSFL.clsProductFacade"); //创建控件!

//clsProductFacade .Login (g_oLogin);

var Ref = new ActiveXObject("UFReferC.UFReferClient");//创建参照控件

Ref.EnumRefInit(g_oLogin, 2,false, "Customer");       //置参照

Ref.Show();                                            //显示参照

WScript.Echo(  Ref.recmx.Filter);                      //显示用户选择

g_oLogin.shutdown();                                   //释放登录控件