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

/*****************************************
,  code by 张朋
'  Email: Z@nczp.tk
'  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();                                   //释放登录控件