Foxtable(狐表)用户栏目专家坐堂 → 异常错误捕捉


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

主题:异常错误捕捉

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


加好友 发短信
等级:六尾狐 帖子:1495 积分:11133 威望:0 精华:0 注册:2014/8/13 16:19:00
异常错误捕捉  发帖心情 Post By:2015/4/21 14:27:00 [显示全部帖子]

try
    cmd.C
    cmd.CommandText = strSQL
    Count = cmd.ExecuteNonQuery()
    dr("状态") = "完成"
    dr("时间") = Date.Now
    dr.Save
catch ex As Exception
    dr("状态") = "异常" 
    dr("时间") = Date.Now
    dr.Save
End try

其中,当strSQL不正确时,弹出错误窗口,并未和我设想的一样,在表里写一个“异常”,何解?

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


加好友 发短信
等级:六尾狐 帖子:1495 积分:11133 威望:0 精华:0 注册:2014/8/13 16:19:00
  发帖心情 Post By:2015/4/21 14:36:00 [显示全部帖子]

求教:
我进行数据同步,上百个sql语句,我不想自己复制执行。
所以写在表中[sql表],弹出一个窗口,一条一条地读,然后执行。
这其中就有的因为各种原因,导致sql语句本身不正确,如何在表中标识错误的sql语句?

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


加好友 发短信
等级:六尾狐 帖子:1495 积分:11133 威望:0 精华:0 注册:2014/8/13 16:19:00
  发帖心情 Post By:2015/4/21 14:39:00 [显示全部帖子]

Event:   字符型,返回发生错误的事件名称
Message1: 字符型,返回简明错误信息
Message2: 字符型,返回详细错误信息
Cancel:  逻辑型,设为True将禁止系统显示错误信息。
ex:       System.Exception类型,返回发生的错误,一般用户不需要使用此参数。

我的问题是,这里面怎么知道是我的哪个语句出问题了?

For Each dr As DataRow In drs
    strSQL = dr("SQL")
    If dr.Isnull("内容") Then
    Else
        e.Form.Controls("Label1").text ="正在执行:" & dr("内容")
    End If
    Dim cmd As New SQLCommand
    Dim Count As Integer
try
    cmd.C
    cmd.CommandText = strSQL
    Count = cmd.ExecuteNonQuery()
    dr("状态") = "完成"
    dr("时间") = Date.Now
    dr.Save
catch ex As Exception
    dr("状态") = "异常" 
    dr("时间") = Date.Now
    dr.Save
End try

Next

 回到顶部