怎么使用vb6.0的ado组件增加，删除，修改sql 2000表中的数据呀？

怎么使用vb6.0的ado组件增加，删除，修改sql 2000表中的数据呀？
老师什么都没告诉我们，全要我们去自学，可是网络上又没什么有用的资源。
各位帮帮我呀。。

rs.Open "insert into 入库信息 values ('" & Trim(Text7.Text) & "','" & Trim(Text1.Text) & "','" & Trim(Text2.Text) & "','" & Trim(Text3.Text) & "','" & Trim(Text4.Text) & "','" & Trim(DTPicker1.Value) & "','" & Trim(Text5.Text) & "','" & Trim(Text6.Text) & "')", conn, adOpenDynamic, adLockReadOnly
  MsgBox "添加成功！", 0 + 48 + 0, "提示"


这个错在哪里呀？

conn.execute "insert into 入库信息 values ('" & Trim(Text7.Text) & "','" & Trim(Text1.Text) & "','" & Trim(Text2.Text) & "','" & Trim(Text3.Text) & "','" & Trim(Text4.Text) & "','" & Trim(DTPicker1.Value) & "','" & Trim(Text5.Text) & "','" & Trim(Text6.Text) & "')"