Update出現"提供者不支援應用程式所要求的操作",非常急.....(編號:2722)

我使用了下列方法但是還是出現錯誤:(我的欄位大約開了70個以上)
方法一:
rs!ad_area = Trim(cmbArea.Text)
rs!ad_no = Trim(txtNo.Text)
rs!ad_name = Trim(txtName.Text)
......
..........
rs.update
方法二:
rs("ad_area") = Trim(cmbArea.Text)
rs("ad_no") = Trim(txtNo.Text)
rs("ad_name") = Trim(txtName.Text)
.....
..........
rs.update
方法一及二出現:執行階段錯誤'3251':提供者不支援應用程式所要求的操作
方法三:
adodc1.recordset("ad_area") = Trim(cmbArea.Text)
adodc1.recordset("ad_no") = Trim(txtNo.Text)
adodc1.recordset("ad_name") = Trim(txtName.Text)
.....
..........
adodc1.recordset.update
方法四:
fieldname="ad_area"
fieldvalue=cmbarea.text
adodc1.recordset.update fieldname,fieldvalue
........
.....
方法三及四出現:查詢太過複雜的錯誤
救救我,謝謝!!