Existiendo "datareader" con el que puedo leer e identificar si unos campos de un login (usuario y password) han sido introducidos correctamente. ¿Cómo puedo añadir una acción de escritura para que al usuario seleccionado que se haya conectado a mi aplicación se le añada la cadena "conectado" en una tercera columna que se llame "estado" y que todos los usuarios de mi tabla tengan a null excepto el que se conecta?
Trabajo con VB. net 2003
Mi botón:

Private Sub BtnAceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnAceptar.Click
Dim pos As Integer = 0
Dim m As Integer


conector.Open()
Dim cmd As New OleDbCommand("Select * from Tabla", conector)
Dim dr As OleDbDataReader = cmd.ExecuteReader

Do While dr.Read
If (dr.Item("nombre") = TextBox1.Text) Then
If (dr.Item("password") = TxtBoxPassword.Text) Then

BindingContext(midataset, "Tabla").Position = pos

If (dr.Item("nombre") = "admin") Then
f3.Show()
Me.Hide()

Else
f2.Show()
Me.Hide()
End If

End If






DataGrid1.DataSource = midataset
DataGrid1.DataMember = "Tabla"
m = 1

Else
pos = pos + 1
End If
Loop


If m = 0 Then
MsgBox("Nombre de usuario o contraseña")
End If
conector.Close()
End Sub