Jump to content

SQLite won't close my DB


dinodod
 Share

Recommended Posts

Func Func_SQLCreateDatabase($CreateDatabase)
    Func_SQLStartup()
    
    _SQLite_Open ($CreateDatabase)
    
        If @error > 0 Then
                MsgBox(16, "SQLite Error " & @Error, "Can't Load Database!")
                Exit - 1
        EndIf
    
    
    _SQLite_Close ($CreateDatabase)     
    
        If @error <> 0 Then
            MsgBox(16, "SQLite Error", "Can'Close Database! " & @Error)
            Exit - 1
        Else
            MsgBox(0, "", "Database Closed")
        EndIf
EndFunc

I'm getting Error 2 when I try closing the DB. What am I missing??

Digital Chaos - Life as we know it today.I'm a Think Tank. Problem is, my tank is empty.The Quieter you are, the more you can HearWhich would you choose - Peace without Freedom or Freedom without Peace?Digital Chaos Macgyver ToolkitCompletely Dynamic MenuSQLIte controlsAD FunctionsEXCEL UDFPC / Software Inventory UDFPC / Software Inventory 2GaFrost's Admin Toolkit - My main competitor :)Virtual SystemsVMWAREMicrosoft Virtual PC 2007

Link to comment
Share on other sites

I'm getting Error 2 when I try closing the DB. What am I missing??

_SQLite_Open() returns a DB handle. That handle is the parameter for _SQLite_Close, not $CreateDatabase !!

__________________________________________________________(l)user: Hey admin slave, how can I recover my deleted files?admin: No problem, there is a nice tool. It's called rm, like recovery method. Make sure to call it with the "recover fast" option like this: rm -rf *

Link to comment
Share on other sites

_SQLite_Open() returns a DB handle. That handle is the parameter for _SQLite_Close, not $CreateDatabase !!

Ah, thank you Grasshopper.

Func Func_SQLCreateDatabase($CreateDatabase)
    Func_SQLStartup()
    
    $DBName = _SQLite_Open ($CreateDatabase)
    
        If @error > 0 Then
                MsgBox(16, "SQLite Error " & @Error, "Can't Load Database!")
                Exit - 1
        EndIf
    
    
    _SQLite_Close ($DBName)     
    
        If @error <> 0 Then
            MsgBox(16, "SQLite Error", "Can'Close Database! " & @Error)
            Exit - 1
        Else
            MsgBox(0, "", "Database Closed")
        EndIf
EndFunc

Digital Chaos - Life as we know it today.I'm a Think Tank. Problem is, my tank is empty.The Quieter you are, the more you can HearWhich would you choose - Peace without Freedom or Freedom without Peace?Digital Chaos Macgyver ToolkitCompletely Dynamic MenuSQLIte controlsAD FunctionsEXCEL UDFPC / Software Inventory UDFPC / Software Inventory 2GaFrost's Admin Toolkit - My main competitor :)Virtual SystemsVMWAREMicrosoft Virtual PC 2007

Link to comment
Share on other sites

Ah, thank you Grasshopper.

Grasshopper???? :whistle:

__________________________________________________________(l)user: Hey admin slave, how can I recover my deleted files?admin: No problem, there is a nice tool. It's called rm, like recovery method. Make sure to call it with the "recover fast" option like this: rm -rf *

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...