Adodc UPDATA有关问题 达人来 高分送分

Adodc UPDATA问题 达人来 高分送分
Private   Sub   Command1_Click()
Form1.Adodc1.RecordSource   =   "SELECT       *       FROM       data       WHERE       名称= ' "   &   CStr(Form1.MSHFlexGrid1.TextMatrix(Form1.MSHFlexGrid1.Row,   1))   &   " ' "
Form1.Adodc1.Refresh
上面代码可以顺利读取到我在MSHFlexGrid里所选定的数据   可只要Adodc.Refresh   MSHFlexGrid里记录就只剩下我选的那条记录了，其它记录在MSHFlexGrid里消失了，怎么解决呢？

Form1.Adodc1.Recordset.ActiveConnection.Execute   "update   [data]   set(名称,   单位)       values( ' "   &   Text1(0).Text   &   " ', ' "   &   Text1(1).Text   &   " ') "
上面这段代码显示UPDATE语句的语法错误，怎么解决呢。
End   Sub


[解决办法]
Private Sub Command1_Click()

Form1.Adodc1.Recordset.ActiveConnection.Execute "update [data] set 名称= ' " & _
Text1(0).Text & " ', 单位= ' " & Text1(1).Text & " ' WHERE 名称= ' " & _
Form1.MSHFlexGrid1.TextMatrix(Form1.MSHFlexGrid1.Row, 1)) & " ' "

Form1.Adodc1.Refresh

End Sub