Foxtable(狐表)用户栏目专家坐堂 → 有关调用实时(JIT)调试而不是此对话框的详细信息 怎么处理呢?


  共有3932人关注过本帖树形打印复制链接

主题:有关调用实时(JIT)调试而不是此对话框的详细信息 怎么处理呢?

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


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
有关调用实时(JIT)调试而不是此对话框的详细信息 怎么处理呢?  发帖心情 Post By:2022/5/11 18:59:00 [只看该作者]

 

 详细错误内容:

有关调用实时(JIT)调试而不是此对话框的详细信息,
请参见此消息的结尾。


图片点击可在新窗口打开查看此主题相关图片如下:捕获.png
图片点击可在新窗口打开查看

 
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档.txt

 

代码如下:运行提示如图错误!

 

Dim cmd As New SQ LCommand
cmd.Conn ectio nName = "无纸化会议"
Dim dt As DataTable
cmd.Comm andText = "SELE CT * Fr om 会议状态"
dt = cmd.Execut eReader()

Dim  bb As DataRow=dt.Find("uuid='" & vars("会议主题uuid") & "'and 会议状态=true")
If bb IsNot Nothing Then  '如果会议状态存在符合条件的uuid记录'
    If bb("会议状态")=True Then
        For Each f As WinForm.Form In Forms
            If Forms(f.Name).opened Then
                If  f.name.Co ntains("会议系统") Or f.name.Contains("会议主题") Or f.name.Contains("会议议题") Or f.name.Contains("结束提醒") Then
                   
                    baseMainform.visible=True  '显示主项目'
                Else
                    Forms(f.Name).Close()
                    If Forms("结束提醒").opened = False Then
                        Forms("结束提醒").open
                    End If
                    baseMainform.visible=True  '显示主项目'
                End If
            End If
        Next
        If FileSys.DirectoryExists(ProjectPath & "下载文件") Then '如果目录C:\MyFolder存在
            FileSys.DeleteDirectory(ProjectPath & "下载文件",2,2) '则删除之
        End If
        If FileSys.DirectoryExists(ProjectPath & "上传文件")  Then '如果目录C:\MyFolder存在
            FileSys.DeleteDirectory(ProjectPath & "上传文件",2,2) '则删除之
        End If
        'vars("会议主题uuid")=""
    Else
        If Forms("会议主体").opened = False Then
           
            cmd.Com ma ndText = "SELE CT Count(*)  Fro m 系统设置 where 设置名='登录开关' and 设置内容='true'"
            If cmd.ExecuteScalar > 0 Then
                If Forms("会议登录").opened = False Then
                    Forms("会议登录").open
                    baseMainform.visible=False  '隐藏主项目
                End If
            Else
                Forms("会议主体").open
                baseMainform.visible=False  '隐藏主项目
            End If
        End If
    End If
End If

 



[此贴子已经被作者于2022/5/11 19:10:56编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106168 积分:539957 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/12 8:41:00 [只看该作者]

调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm,看哪一句代码出错

 回到顶部