日期:2014-05-18  浏览次数:20430 次

关于VB操作SQL2005数据库的一个问题 本人比较菜 问的特简单 望指导
Dim CN As New ADODB.Connection '定义数据库的连接存放数据和代码
Dim Rs As New ADODB.Recordset


Private Sub Command1_Click() ’查询用
Adodc1.RecordSource = "select * from 和拓 WHere 姓名 like '%" & Text1.Text & "%'"
Adodc1.Refresh
End Sub

Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=zenghui;Data Source=PC-200911242148"
Adodc1.CommandType = 1 '属性用于指定RecordSource(下面那个)属性的取值类型 1 为commandtext作为命令或存储过程调用的文本化定义进行计算
Adodc1.RecordSource = "select * from 和拓"
Set MSHFlexGrid1.DataSource = Adodc1
Adodc1.Refresh
End Sub


Private Sub Command2_Click()
Adodc1.RecordSource = "UPDATE 和拓 SET 性别='女'"
Adodc1.Refresh
End Sub
 
上面是我写的一个VB连接SQL数据库的一个程序啦~~可以有查询功能 但是我不知道怎么修改数据库内的数据 比如增加 删除等等,Adodc1.RecordSource = "UPDATE 和拓 SET 性别='女'"这个本来是想用来修改性别这列的数据来着 但是好像不可以这样做,提示错位为 对象关闭时不允许操作,是不是RecordSource属性只能用来查询呢?。而且手头上也没有这类的书参考 麻烦各位指条明路了 应该是比较简单的。另外求大家介绍本这方面的书~~先谢谢各位了

------解决方案--------------------
要添加、删除就改上面 sql 的字符串。

添加就 sql="inster into ........."
删除就 sql="delete from ........"
------解决方案--------------------
修改sql语句即可
------解决方案--------------------
探讨

要添加、删除就改上面 sql 的字符串。

添加就 sql="inster into ........."
删除就 sql="delete from ........"