关于dategrid怎样与数据库相连?急需............ 要将dategrid与数据库中表相连,且要进行添加,删除,更新操作。怎么弄? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 相连:Set DataGrid1.DataSource = 记录集操作:控件右键属性可以设是否可以添加、删除、更新,或有代码实现。^_^ 方法1:通过用adodc控件连接;方法2:定义ado对象。 Set DataGrid1.DataSource = 记录集 Option ExplicitPrivate Rs As New ADODB.RecordsetPrivate Conn As New ADODB.ConnectionPrivate Sub Form_Load() Dim strConn As String ' 连接数据库的字符串 ' 连接带密码的数据库,直接在连接符后面加上Jet OLEDB:DataBase Password='您的密码' ' 连接Access97数据库需要使用Jet.OLEDB.3.5,Access2K和以上数据库使用Jet.OLEDB.4.0 strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False" ' 使用客户端数据游标 Conn.CursorLocation = adUseClient ' 打开Access的连接 Conn.Open strConn ' 如果RecordSet的状态不是关闭状态,则关闭Recordset If Rs.State <> adStateClosed Then Rs.Close ' Recordser打开表People Rs.Open "Select * from People", Conn, adOpenKeyset, adLockOptimistic ' 报告出 一共多少笔数据,测试是否存在数据 ' MsgBox Rs.RecordCount ' 绑定进DataGrid Set DataGrid1.DataSource = Rs End Sub 增加:rs.addnew 删除:rs.delete 修改直接在datagrid上修改就是 如何读下面二个文件内容 zuanfen sujie 想用VB写个判断是否为数值的函数 如何用SendMessage删除ListView中一行 哪个高手能给我一段源代码啊??? 谁知道用vb在excel中插入列 紧急求助 VB编程?输入一个日期,计算出该日期下一个月的最后一天 请大家帮一个忙,有关realplayer控件的问题 为什么我的access 没有convert函数? 在SQL Server 中 我想在读一个表的时候,把表锁住只,有程序能够对其操作,其他人都不能读写这个表,有没有办法做到? 怎么在sstab中的某个tab中动态添加一个控件啊?
操作:控件右键属性可以设是否可以添加、删除、更新,或有代码实现。^_^
方法2:定义ado对象。
Private Conn As New ADODB.ConnectionPrivate Sub Form_Load()
Dim strConn As String
' 连接数据库的字符串
' 连接带密码的数据库,直接在连接符后面加上Jet OLEDB:DataBase Password='您的密码'
' 连接Access97数据库需要使用Jet.OLEDB.3.5,Access2K和以上数据库使用Jet.OLEDB.4.0
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False"
' 使用客户端数据游标
Conn.CursorLocation = adUseClient
' 打开Access的连接
Conn.Open strConn
' 如果RecordSet的状态不是关闭状态,则关闭Recordset
If Rs.State <> adStateClosed Then Rs.Close
' Recordser打开表People
Rs.Open "Select * from People", Conn, adOpenKeyset, adLockOptimistic
' 报告出 一共多少笔数据,测试是否存在数据
' MsgBox Rs.RecordCount
' 绑定进DataGrid
Set DataGrid1.DataSource = Rs
End Sub 增加:rs.addnew
删除:rs.delete
修改直接在datagrid上修改就是