社区
数据库(包含打印,安装,报表)
帖子详情
如何程序测试数据库是否已被破坏??
Sean918
2002-04-11 01:16:24
我的程序在长时间运行时多次插入了数据库操作,但是对于突然断电的情况时常有数据库被破坏的情况。我在程序开始运行时加入了打开数据库操作(只打开,不做操作),在数据库破坏的情况下,有时能发现出错,这个时候我可以做出错处理,但是有时候却不报错,直到运行一断时间后才报错。
请问各位高手,提供方案!
...全文
62
15
打赏
收藏
如何程序测试数据库是否已被破坏??
我的程序在长时间运行时多次插入了数据库操作,但是对于突然断电的情况时常有数据库被破坏的情况。我在程序开始运行时加入了打开数据库操作(只打开,不做操作),在数据库破坏的情况下,有时能发现出错,这个时候我可以做出错处理,但是有时候却不报错,直到运行一断时间后才报错。 请问各位高手,提供方案!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
15 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
Sean918
2002-04-11
打赏
举报
回复
谢谢~
给分了。
gump2000
2002-04-11
打赏
举报
回复
gump2000@21cn.com
Sean918
2002-04-11
打赏
举报
回复
十分感谢您!能否留下您确实的联系方法,以后有事可以经常请教您。
再次感谢!
gump2000
2002-04-11
打赏
举报
回复
能,只要不是人为的破坏,绝对可以
一般程序操作,都会出现一点点小问题的
比如异常终止啊,这个程序就可以修复
Sean918
2002-04-11
打赏
举报
回复
呵呵。。
真是麻烦您了。
这样的压缩和修复能达到我的“检测数据库是否已经破坏”的目的么?
我要肯定的回答,如果存在可能无法检测的情况,就没有实际意义了。
谢谢
gump2000
2002-04-11
打赏
举报
回复
DBEngine.CompactDatabase 压缩和修复数据库
$tmp$.mdb是临时数据库
Sean918
2002-04-11
打赏
举报
回复
再请问2个小问题:
1. 在database 目录下 $tmp$.mdb 是什么东西?
2.您的sub 的作用和删除db然后重建有什么区别吗?
gump2000
2002-04-11
打赏
举报
回复
那是我的程序中弄出来的,另外一个是用来备份数据的。
Public Function SYSDATABASE() As String
SYSDATABASE = App.Path & "\Database\my.mdb"
End Function
假设您的数据库放在程序的database下的my.mdb
Public Sub RepairDataBase()
Dim TmpData As String
TmpData = App.Path & "\DataBase\$tmp$.mdb"
If FileExists(TmpData) Then Kill TmpData
DBEngine.CompactDatabase SYSDATABASE, TmpData
Kill SYSDATABASE
Name TmpData As SYSDATABASE
End Sub
就这样
Sean918
2002-04-11
打赏
举报
回复
不好意思,我不明白您的sgxg.dat和backup.dat有什么用?
我只有一个tmp.mdb ,但是看您的代码:
If FileExists(TmpData) Then Kill TmpData
已经将我唯一的数据库删除了,我的database文件夹里已经没有东西可操作了
我是初学vb,所以还是不明白? 麻烦您详细解释,不甚感激。
gump2000
2002-04-11
打赏
举报
回复
给你看看定义
'数据库位置
Public Function SYSDATABASE() As String
SYSDATABASE = App.Path & "\Database\sgxg.dat"
End Function
Public Function BACKDATABASE() As String
BACKDATABASE = App.Path & "\Database\backup.dat"
End Function
其实就是您的数据库存放位置,明白?
Sean918
2002-04-11
打赏
举报
回复
两个都是路径?
不会吧
gump2000
2002-04-11
打赏
举报
回复
呵呵,这个是我自己用的
backdatabase和sysdatabase就是数据库的存放路径
databasepwd就是您的数据库密码
假如没有的话
就去掉后面的, , , ";pwd=" & DataBasePWD
Sean918
2002-04-11
打赏
举报
回复
还有BACKDATABASE!
Sean918
2002-04-11
打赏
举报
回复
SYSDATABASE 是什么数据类型阿?
要详细说明!拜托!!
gump2000
2002-04-11
打赏
举报
回复
不管他,启动就压缩修复一下
'修复压缩数据库
Public Sub RepairDataBase()
Dim TmpData As String
TmpData = App.Path & "\DataBase\tmp.mdb"
If FileExists(TmpData) Then Kill TmpData
DBEngine.CompactDatabase SYSDATABASE, TmpData, , , ";pwd=" & DataBasePWD
Kill SYSDATABASE
Name TmpData As SYSDATABASE
If FileExists(TmpData) Then Kill TmpData
DBEngine.CompactDatabase BACKDATABASE, TmpData, , , ";pwd=" & DataBasePWD
Kill BACKDATABASE
Name TmpData As BACKDATABASE
End Sub
再有问题就可以报警无法解决了
1小时入门最新小
程序
授权登录注册功能开发,并把注册记录添加到
数据库
新版微信小
程序
授权登录,退出,缓存,小
程序
个人中心的实现 如果把用户授权的信息存入Mysql/云开发的
数据库
,怎么实现呢? 授权登录对于不同的用户好像没有唯一的标识,是不是还得获取openid才行? 授权登录必须从...
如何进行
数据库
测试
?Jmeter进行mysql
测试
案例分享篇
数据库
、Linux、
测试
理论、软件工程知识、计算机基础、网络基础、服务器基础、
程序
语言基础等,都是软件
测试
从业者必须具备的基础知识。大部分我们都接触比较多,但对于
数据库
,从实际的了解来看,很多从业者对...
什么是
破坏
性
测试
?
破坏
性
测试
的流程与用例设计
破坏
性
测试
是一种
测试
方法,旨在评估系统或应用
程序
在极端负载、异常条件或攻击情况下的表现和稳定性。通过模拟和验证系统的抗压能力和耐受性,以揭示系统可能存在的弱点和故障。
破坏
性
测试
的目的是暴露系统的...
数据库
程序
的单元
测试
这些笔录是我关于已完成的
数据库
功能
测试
的一些心得。其中的例子是用java语言编写的,但我认为这些想法对于大多数编程环境都普遍适用。当然,我仍致力于寻找更佳的解决方案。 现实的问题是这样的:你有一个SQL...
编写
数据库
大数据
测试
脚本_编写数据访问代码
测试
–不要忘记
数据库
编写
数据库
大数据
测试
脚本 在为数据访问代码编写
测试
时,必须遵循以下三个规则: 我们的
测试
必须使用真实的
数据库
架构。 我们的
测试
必须是确定性的。 我们的
测试
必须断言正确的事情。 这些规则是显而易见...
数据库(包含打印,安装,报表)
1,216
社区成员
55,954
社区内容
发帖
与我相关
我的任务
数据库(包含打印,安装,报表)
VB 数据库(包含打印,安装,报表)
复制链接
扫一扫
分享
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章