Member Avatar for manutd4life

hi all i need is the comments for this piece of code
here it is:

Private Sub populate() 
        con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
                                System.Environment.CurrentDirectory.ToString() & "\DataBase.mdb") '
        con.Open() 
        dAdapt = New Data.OleDb.OleDbDataAdapter("select * from Watches", con) 
        dSet = New DataSet
        dAdapt.Fill(dSet)
        dBind.DataSource = dSet
        dBind.DataMember = dSet.Tables(0).ToString()
        DataGridView.DataSource = dBind
    End Sub

please help thx

  • 2 Contributors
  • 1 Reply
  • 108 Views
  • 6 Hours Discussion Span
  • Latest Post Latest Post by sknake
Member Avatar for sknake 
Private Sub populate() 
	'Instantiating a new connection
        con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
                                System.Environment.CurrentDirectory.ToString() & "\DataBase.mdb") '
	'Opening the connection
        con.Open() 
	'Instantiating a new data adapter
        dAdapt = New Data.OleDb.OleDbDataAdapter("select * from Watches", con) 
	'Instantiating a new dataset
        dSet = New DataSet
	'Populating the dataset with the results from the adapters select query
        dAdapt.Fill(dSet)
	'binding the datasets first table member
        dBind.DataSource = dSet
        dBind.DataMember = dSet.Tables(0).ToString()
	'binding the control for presentation
        DataGridView.DataSource = dBind
    End Sub
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.