Foxtable(狐表)用户栏目专家坐堂 → 数据库被置锁定 不可打开状态


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

主题:数据库被置锁定 不可打开状态

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


加好友 发短信
等级:幼狐 帖子:103 积分:1664 威望:0 精华:0 注册:2016/5/11 0:19:00
数据库被置锁定 不可打开状态  发帖心情 Post By:2017/4/10 1:03:00 [只看该作者]

For Each r As Row In Tables("A表").Rows
Dim p As String = IIF(r.DataRow.RowState = DataRowState.Added, "A#", "U#")
r.Save()
Dim msg As String = p & "A表" & "#" & r("编号")
For Each bd As QQBuddy In QQClient.Buddies
    If bd.Online Then
        QQClient.Send(bd.name, msg)
    End If
Next
Next

这个代码,新添加几条 保存 没有问题 但是新添加了10多条之后 就会出现 :数据库被置锁定 不可打开状态 

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/10 8:36:00 [只看该作者]

 

 你测试的时候,使用了多少个好友测试?把你做的项目发上来测试下。服务器端和客户端都发过来。

 


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


加好友 发短信
等级:幼狐 帖子:103 积分:1664 威望:0 精华:0 注册:2016/5/11 0:19:00
  发帖心情 Post By:2017/4/10 13:02:00 [只看该作者]

单机和局域网都测试过  只有2个帐号 其他代码都是复制openqq的帮助  这段保存的 只改了:
For Each r As Row In Tables("A表").Rows

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/10 14:57:00 [只看该作者]

加入你改成这样,是否还有问题?

 

For Each r As Row In Tables("A表").Rows
Dim p As String = IIF(r.DataRow.RowState = DataRowState.Added, "A#", "U#")
r.Save()
Dim msg As String = p & "A表" & "#" & r("编号")
For Each bd As QQBuddy In QQClient.Buddies
    If bd.Online Then
        QQClient.Send(bd.name, msg)
    End If
Next
system.threading.thread.sleep(1000)
Next
 
如果是整体修改,建议你改一下思路,先得到全部编号,把编号都合并起来再发送过去,这样可以减少发送信息的次数。

 回到顶部