Database

Public Class frmTest
    Dim bmb As BindingManagerBase
    Dim bs As New BindingSource
    Private Sub frmTest_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        connDB()
    End Sub

    Private Sub connDB()
        Dim cn As New OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0; Data Source = D:\TEMP\TestADO\DB\db1.mdb;")
        Dim da As New OleDbDataAdapter("Select * From tblAdd;", cn)
        Dim dt As New DataTable
        Dim ds As New DataSet
        da.Fill(dt)
        bs.DataSource = dt
        dgv.DataSource = bs
        bmb = BindingContext(bs)
    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        bmb.Position = 0
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        bmb.Position = bmb.Position + 1
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        bmb.Position = bmb.Position - 1
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        bmb.Position = bmb.Count - 1
    End Sub
End Class

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.Data.SqlClient;

namespace testBindings
{
    public partial class Form1 : Form
    {
        private SqlConnection conn ;
        private SqlDataAdapter da;
        private DataSet ds;
        public BindingSource bs;
        public BindingManagerBase bmb;

        public Form1()
        {
            InitializeComponent();
        }

        private void Form1_Load(object sender, EventArgs e)
        {
            conn = new SqlConnection ("Data Source=myhome\\sqlexpress;Initial Catalog=ChickenPeoxX;Integrated Security=True");
            da= new SqlDataAdapter ("select * from tblGroup;",conn );
            ds= new DataSet ();
            da.Fill(ds,"GROUP");
            dgv.DataSource = ds.Tables[0];//,"GROUP"];
            bs = new BindingSource( );             
            bmb = BindingContext[bs]; 
            bs.DataSource  = ds.Tables[0];//"GROUP"]; 
         }

        private void button1_Click(object sender, EventArgs e)
        {
            bmb.Position = bmb.Position+ 1;
            textBox1.Text = bmb.Position.ToString() ;
        }

        private void button2_Click(object sender, EventArgs e)
        {
            bmb.Position = bmb.Position-1;
            textBox1.Text = bmb.Position.ToString();
        }
    }
}

<br />
GetConnection() as SqlConnection (returns it unopened but populated with the connection string)<br />
GetDataTable(sql as string) as DataTable<br />
ExecuteQuery(sql as string) as integer<br />
etc...<br />

---Guy H ( ---