Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

handle is not initialized

Status
Not open for further replies.
SQL2KDBA69

SQL2KDBA69

Programmer
Feb 4, 2004
227
US
Code: 
public class dbaccess

Private mcnnAccess As OleDb.OleDbConnection

Public Sub New()

        mcnnAccess = New OleDb.OleDbConnection
        mcnnAccess.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\Remote\Serverlist.mdb"
        mcnnAccess.Open()

    End Sub

Public Function GetServer(ByVal pstrdataset As DataSet) As DataSet

        objadapter = New OleDb.OleDbDataAdapter("Select * From Servers", mcnnAccess)
        objadapter.Fill(pstrdataset)
        pstrdataset = pstrdataset

    End Function

Protected Overrides Sub Finalize()
        MyBase.Finalize()
        mcnnAccess.Close()
        mcnnAccess = Nothing
    End Sub

Thats the code in my close and when i call the getserver module and exit the program i get a handle is not initialized error. on the mcnnAccess.Close() line.

any advise is appreciated.
 
Sort by date Sort by votes
i tried that and still get this error

An unhandled exception of type 'System.InvalidOperationException' occurred in mscorlib.dll

Additional information: Handle is not initialized.
 
Upvote 0 Downvote
this where where i call the class.

Code: 
Public objdataset As DataSet = New DataSet
Public objServer As New clsServers

    Public Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Call objServer.GetServer(objdataset)
        
    End Sub
 
Upvote 0 Downvote
Code: 
Public objdataset As DataSet = New DataSet
Public objServer As New dbaccess

    Public Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Call objServer.GetServer(objdataset)
        
    End Sub

that the right class name
 
Upvote 0 Downvote
i set it here.

Code: 
Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        objServer = Nothing
        objdataset = Nothing
    End Sub
 
Upvote 0 Downvote
i have this in my dbaccess class?

Code: 
Protected Overrides Sub Finalize()
        MyBase.Finalize()
        mcnnAccess.Close()
        mcnnAccess = Nothing
    End Sub
 
Upvote 0 Downvote
Are you setting dbaccess = nothing before you call finalize?
NO im not setting dbaccess = nothing any where.
 
Upvote 0 Downvote
Okay, so what's with this code?
Code: 
Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        [b]objServer = Nothing[/b]
        objdataset = Nothing
    End Sub

And where are you calling the .Finalize method from?

-Rick

VB.Net Forum forum796 forum855 ASP.NET Forum
[monkey]I believe in killer coding ninja monkeys.[monkey]
 
Upvote 0 Downvote
I took that out. I dont call the .Finalize method it auto runs when the app closed.
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

sal21
  • Question Question
THIS is new for me
Replies
4
Views
364
strongm
strongm
sal21
  • Locked
  • Question Question
SORT DATE in msflexgrid not correct
Replies
4
Views
576
sal21
sal21
sal21
  • Locked
  • Question Question
NOT FOR ME, get value from table web
Replies
1
Views
471
sal21
sal21
Michael OConnor
  • Locked
  • Question Question
Is this Meridian Mail
Replies
2
Views
399
Michael OConnor
Michael OConnor
sal21
  • Locked
  • Question Question
CHECK if the job print is finished
Replies
7
Views
634
Andrzejek
Andrzejek

Part and Inventory Search

Sponsor

Back
Top