Search:

myrecset1.open "select name from tabl",myconn,adopendynamic,adlockoptimistic
msgbox myrecset1.fields("name")

http://www.vbforums.com/showthread.php?t=663732

which used a tab control.

install your application run as administrator.

or try
Use Microsoft ActiveX Data Objects 6.0 BackCompat


http://support.microsoft.com/kb/2517589

Install a device such as an alarm circuit. (I do not know how to)
TV turns off, play Let the alarm.

to make a link your tables like this example
and try previous sample



Dim adoCn As ADODB.Connection
Dim adoCat As New ADOX.Catalog
Dim adoTbl As New ADOX.Table

Private Sub Command1_Click()

Connect to the database before the new source table.
(linked table)

after try this

cnn.execute "select * into newtablename from oldtablename"