Timer Vb.Net

[mrprogman]

Lo que yo ocupo hacer es que cada cierto tiempo este codigo se ejecute en la TODAS las maquinas..yo pienso que con un timer...y puse el ejemplo de como estoy manejando la hora con un timer.Saludos

Dim con7 As New OleDb.OleDbConnection
con7.ConnectionString = ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\XYZ\Expo2012A.mdb;Persist Security Info=False;")
'Dim ban2 As Integer
con7.Open()
'Dim SSel As String
Dim da7 As OleDbDataAdapter = New OleDbDataAdapter("SELECT count(*) FROM Registrados group by id ", con7)
'SELECT count(clientes.NUMERO) AS Numero_Personas FROM clientes WHERE clientes.HORA_LLEGADA is not null

Dim ds7 As New DataSet
ds7.Clear()

Label17.Text = da7.Fill(ds7)

If da7 Is Nothing Then
MsgBox("Please enter First Name")
End If

'TextBox9.Text = ds7.Tables(0).Rows(0)("count(*)")
con7.Close()

Dim con8 As New OleDb.OleDbConnection
con8.ConnectionString = ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\XYZ\Expo2012A.mdb;Persist Security Info=False;")
'Dim ban2 As Integer
con8.Open()
'Dim SSel As String
Dim da8 As OleDbDataAdapter = New OleDbDataAdapter("SELECT count(*) FROM Expo group by id ", con8)
'SELECT count(clientes.NUMERO) AS Numero_Personas FROM clientes WHERE clientes.HORA_LLEGADA is not null

Dim ds8 As New DataSet
ds8.Clear()

Label21.Text = da8.Fill(ds8)