用友登录控件Vbs脚本调用

zh3305 · 发表于 2011-8-12 22:39:22

您需要登录才可以下载或查看，没有账号？注册账号

×

本帖最后由 zh3305 于 2011-8-12 22:40 编辑

' 郁闷啊.用C# 用 U8Login调控件始终Ui线程刷新不足. 总是象没装显卡的电脑总是不能刷新界面.
' 没想到 Vbs宿主脚本调用都没有什么问题.调用参照控件也是一样..郁闷啊
' code by 张朋
' 2011-8-22
Dim g_oLogin
Dim Result
Set g_oLogin= CreateObject("U8Login.clsLogin") '创建控件!
g_oLogin.ClearError '清除错误!
Result = g_oLogin.Login("DP") '登录模块用DP就可得到一个正式版的模块权限。其它参数均可默认。成功返回True；失败返回False。
If Not Result Then
If g_oLogin.ShareString = "" Then
MsgBox g_oLogin.LogState & "错误号： " & g_oLogin.LogState, vbCritical, "控制台"
Else
MsgBox g_oLogin.ShareString & "错误号： " & g_oLogin.LogState, vbCritical, "控制台"
End If
g_oLogin.ClearError '清除错误!
End If
MsgBox g_oLogin.UfDbName '消息框弹出得到的数据库连接字符串

复制代码

账号		自动登录	找回密码
密码			注册账号

初学者课程：T3自学\|T6自学\|U8自学	软件下载｜课件下载｜工具下载	资料：通资料\|U8资料\|NC\|培训\|年结	积分规则 \| 使用常见问题Q&A
知识库:U8 \| 通 \| NC \| U9 \| OA \| 政务	U8\|U9\|NCC\|NC65\|NC65客开\|NCC客开	新手必读 \| 任务 \| 快速增金币	用友QQ群[微信群]