用adodc打开两个表，如何做

用adodc打开两个表，怎么做
我用下面的语句打开两张表，写入数据，但是每次都第二张表写入，第一张表没动静。不知道是什么问题。
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Password=sq121;Persist Security Info=True;User ID=sa;Initial Catalog=sqqx121;Data Source=WIN2003server"
   
   
   
  Adodc1.RecordSource = "Select * from 降水"
  Adodc1.Refresh
  Adodc1.Recordset.AddNew
   
  Adodc1.Recordset.Fields("年月日") = t
  Adodc1.Recordset.Fields("时次") = tt
   
  For iii = 1 To i
  Print lef(iii), rain(iii)
   
  Adodc1.Recordset.Fields(lef(iii)) = rain(iii)
  Next iii
  Adodc1.Recordset.Close
   
   
  Adodc1.RecordSource = "Select * from 速度"
  Adodc1.Refresh
  Adodc1.Recordset.AddNew
   
  Adodc1.Recordset.Fields("年月日") = t
  Adodc1.Recordset.Fields("时次") = tt
  Text1.Text = tt
  For iii = 1 To i
  Adodc1.Recordset.Fields(lef(iii)) = speed(iii)
  Next iii
  Adodc1.Recordset.Close
   
   
  Adodc1.Recordset.Fields.Refresh
  Adodc1.Recordset.Update
  Set DataGrid1.DataSource = Adodc1

[解决办法]
第一张表操作完Adodc1.Recordset.Update一下
[解决办法]
写完第一张表后试着Adodc1.Recordset.Update,这样将把数据写到硬盘上，而不是缓冲区