Mi sto perdendo: vorrei far leggere da un DB ogni 30 Secondi se l'ora corrente è presente nel DB, in caso affermativo eseguire il Microsoft Transfer Control (prendendo ovviamente altre info presenti nel Record (o nei Record) che rispondono alla condizione: IP ecc..)


Qualcuno puo' gentilmente aiutarmi????


Private Sub FRMSEND_Load(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Load

' apro la connessione
ImpostaCostanti()
Dim cn As ADODB.Connection = New ADODB.Connection
Dim rs As ADODB.Recordset = New ADODB.Recordset

cn.Open(Connessione)
rs.Open("SELECT Client.Data, Client.Ora, Client.IP, Client.Login, Client.Password, Client.CartellaOrigine, Client.CartellaDestinazione FROM Client", cn)
If Not rs.EOF Then
Do While Not rs.EOF


' a questo punto dovrei inserire il TIMER ed eseguire il Microsoft Transfer Control con i dati ricavati dal DB (IP, Login e PSW), ma non so come fare

'....... TIMER

Dim oraprefissata

oraprefissata = (rs.Fields("Login").Value)

If oraprefissata =

' ....... MTC



rs.MoveNext()



Loop
End If
rs.Close()
cn.Close()

rs = Nothing
cn = Nothing

End Sub