set conn_ts2=server.createobject("ADODB.CONNECTION") set rs_ts2=server.createobject("adodb.recordset") conn_ts2.open "test2","","" ww="s12_a0100"+mymonth(date) sql_ts2="select name,ncit,ncct,seiz,answ,serl,pegs from "&ww&" where date="&date1&" and time="&ms&"" rs_ts2.open sql_ts2,conn_ts2 sql="insert into "&xx&"(局向,电路群号,电路数,可用电路数,试呼数,占用数,应答次数,占用话务量) values('"&zw_ts1&"','"&a(i1,1)&"','"&a(i1,2)&"','"&a(i1,3)&"','"&a(i1,4)&"','"&a(i1,5)&"',' "&a(i1,6)&"','"&a(i1,7)&"')" rs.open sql,conn,1,1 |