读书人

如何使用vb6.0的ado组件增加删除修

发布时间: 2011-12-31 23:50:30 作者: rapoo

怎么使用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) & "')"
[解决办法]
rs.AddNew
rs.Fields("sno") = Text1.text
rs.Fields("ssex") = Text2.text
rs.Fields("sname") = Text3.text
rs.Fields("sint") = Text4.text
rs.Update

读书人网 >VB

热点推荐