程序启动时,如何自动判断 MDB文件是否损坏并自

页面导航:首页 > 软件编程 > vb.net > 程序启动时,如何自动判断 MDB文件是否损坏并自

程序启动时,如何自动判断 MDB文件是否损坏并自

来源: 作者: 时间:2016-02-05 12:32 【

若程序使用 MDB文件 ,当 MDB 文件损坏时,一进入程序,便会出现以下讯息: Cant open database name. It may not be a database that your application recognizes, or the

 

 

若程序使用 MDB文件 ,当 MDB 文件损坏时,一进入程序,便会出现以下讯息:

 

Cant open database name. It may not be a database that your application recognizes, or the file may be corrupt. (Error 3049)

 

若是程序中未加入錯誤判断,程式便会中断跳出,这会給使用者极不好的印象,要避免这种情形,甚至不让使用者发現MDB文件损坏,便要加入以下之程序代码加以判断:

 

Private Sub Form_Load()

Dim db As Database

On Error GoTo error1

Set db = OpenDatabase("c: est.mdb")

On Error GoTo 0

: 正常程序开始

:

Exit Sub

 

error1:

If Err = 3049 Then MDB文件损坏

DBEngine.RepairDatabase "C: est.mdb"

Resume

Else

MsgBox Err & Error(Err)

End If

End Sub

 

 

Tags:

相关文章

    文章评论

    最 近 更 新
    热 点 排 行
    Js与CSS工具
    代码转换工具
    
    <