Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath ("db/db.mdb")
Sql_1="Select * from control where sw='sw1'"
Set RecSet_1=Server.CreateObject("ADODB.Recordset")
Recset_1.Open Sql_1 ,Conn ,1 ,3
sw_1_status=Recset_1("status")
sw_1_hardware=Recset_1("hardware")