Foxtable(狐表)用户栏目专家坐堂 → 升级后报错


  共有2246人关注过本帖平板打印复制链接

主题:升级后报错

帅哥哟,离线,有人找我吗?
rjh4078
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3355 积分:24732 威望:0 精华:0 注册:2012/3/26 21:47:00
升级后报错  发帖心情 Post By:2019/7/23 15:13:00 [只看该作者]

.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2019.7.21.1
错误所在事件:计划信息栏提示
详细错误信息:
“UserCode”的类型初始值设定项引发异常。
混合模式程序集是针对“v2.0.50727”版的运行时生成的,在没有配置其他信息的情况下,无法在 4.0 运行时中加载该程序集。


计划信息栏提示的代码:
Dim s As String
s= iif(QQClient.Ready,"消息服务器已连接 备份服务正常","无法连接消息服务器 备份服务异常")
If vars("短信平台")=True
    s=s & "  短信平台已就绪,请连接端口!"
End If
StatusBar.Message1=s
Dim ln As new Lunar(Date.Today)



StatusBar.Message2="   本地:【" & format(Date.now,"yyyy年MM月dd日hh:mm") & "】  星期" & "日一二三四五六".Chars(Today.DayOfWeek) & "  农历【" & ln.lunardate  & "】  操作员:" & _username & "     角色:" & _usergroup & "    数据区间:" & Date.Today.AddDays(-7) & "至" & Date.Today
''StatusBar.Message2=StatusBar.Message2 & "       " & iif(dxpt ,"本地短消息服务启动!","本地短消息服务关闭!")




Dim n As timespan=yxq-bdsj
nfi.Text = "门店日报" &  vbcrlf  & "用户:" & _username  & vbcrlf & Iif(n.days>0,"VPN:有效","VPN:过期" )
If SystemMenu=False Then
    ApplicationMenu.visible = False
Else
    ApplicationMenu.visible = True
End If


 回到顶部
总数 13 1 2 下一页