cursorlocation(求高手帮我解决这个问题啊)
资讯
2023-11-29
406
1. cursorlocation,求高手帮我解决这个问题啊?
查看hr的返回值就能知道创建连接对象失败的原因。
2. absoluteposition为?
在rs.open"",con,1,1前加下一句:
rs.CursorLocation = adUseClient
3. vb如何实现数据保存?
VB菜单:工程->引用 里面找 Microsoft ActiveX Data Object 2.8 Library,并勾选上
Dim cn As New ADODB.Connection'声明一个连接对象
Dim rst As New ADODB.Recordset'声明一个记录集对象
Dim SqlStr As String'声明一个字符串变量
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Mode=ReadWrite;Persist Security Info=False;Jet OLEDB:Database Password=111"
'上面是连接到数据库
SqlStr = "Select * From 用户表"
rst.CursorLocation = adUseClient'设置游标位置
rst.Open SqlStr, cn, adOpenDynamic, adLockOptimistic, adCmdText '打开记录集
rst.Fields("用户名称").Value = Text1.Text'修改记录集中第一条记录"用户名称"字段的数值
rst.Fields("用户口令").Value = Text2.Text'修改记录集中第一条记录"用户口令"字段的数值
rst.UpdateBatch '提交,就是写到硬盘的数据库文件
rst.Close '关闭记录集
Set rst = Nothing '释放
cn.Close '关闭连接
Set cn = Nothing '释放
4. 如何使用ADO及DAO设置MeRecordSet?
在 Microsoft Access数据库 (.mdb) 中要求使用记录集时, 将返回 DAO 记录集,在 Microsoft access 项目 (.adp) 中要求使用记录集时,将返回 ADO 记录集。 对于 Recordset 属性已经设置的使用 Visual Basic 的窗体,它进行的读/写行为取决于记录集 (ADO 或 DAO) 类型和包含在带有属性标识的记录集内的数据 (Jet 或 SQL) 类型。 在MDB中,默认情况下,Me.Recordset 是 DAO.Recordset 类型 如 dim rs as Dao.Recordset set rs=Currentdb.openrecordset(tblUserOfficeCn) set me.Recordset=rs 如果你希望使用ADODB.Recordset ,可使用下面方法。 在 Form_Open 里面加入一下代码 DGlobal rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm Suppliers Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open Select * From Suppliers, CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms(Suppliers).Recordset = rstSuppliers Forms(Suppliers).UniqueTable = Suppliers End Sub 注意 ADO Recordset.CursorLocation 属性必须设置为 adUseClient。 在属性表上 UniqueTable(唯一表)属性可在客户/服务器模式中使用,但不能用于 access 数据库 (.mdb)。此属性只能在 Visual Basic 代码中设置。 您可使用 Recordset 属性作如下操作:
1)将多个窗体连接为公用数据集。这种情况允许多窗体的同步处理。 例如: Set Me.Recordset = Forms!Form1.Recordset
2)使用窗体不直接支持的 Recordset 对象上的方法。 例如:当您想要通过 ADO 的 Find 方法或 DAO 的 Find 方法来使用自定义对话框查找记录时,您可以使用 Recordset 属性。
3)回绕一系列影响多窗体的编辑的事务处理(可以重作)。 当打开一个新的 Recordset 对象时,它的第一个记录就是当前记录。 另注意:如果您更改窗体的 RecordSource 属性,您必须使用 Set 语句。更改窗体的 Recordset 属性可能也将更改 RecordSource、RecordsetType 和 RecordLocks 属性。
本站涵盖的内容、图片、视频等数据系网络收集,部分未能与原作者取得联系。若涉及版权问题,请联系我们删除!联系邮箱:ynstorm@foxmail.com 谢谢支持!
1. cursorlocation,求高手帮我解决这个问题啊?
查看hr的返回值就能知道创建连接对象失败的原因。
2. absoluteposition为?
在rs.open"",con,1,1前加下一句:
rs.CursorLocation = adUseClient
3. vb如何实现数据保存?
VB菜单:工程->引用 里面找 Microsoft ActiveX Data Object 2.8 Library,并勾选上
Dim cn As New ADODB.Connection'声明一个连接对象
Dim rst As New ADODB.Recordset'声明一个记录集对象
Dim SqlStr As String'声明一个字符串变量
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Mode=ReadWrite;Persist Security Info=False;Jet OLEDB:Database Password=111"
'上面是连接到数据库
SqlStr = "Select * From 用户表"
rst.CursorLocation = adUseClient'设置游标位置
rst.Open SqlStr, cn, adOpenDynamic, adLockOptimistic, adCmdText '打开记录集
rst.Fields("用户名称").Value = Text1.Text'修改记录集中第一条记录"用户名称"字段的数值
rst.Fields("用户口令").Value = Text2.Text'修改记录集中第一条记录"用户口令"字段的数值
rst.UpdateBatch '提交,就是写到硬盘的数据库文件
rst.Close '关闭记录集
Set rst = Nothing '释放
cn.Close '关闭连接
Set cn = Nothing '释放
4. 如何使用ADO及DAO设置MeRecordSet?
在 Microsoft Access数据库 (.mdb) 中要求使用记录集时, 将返回 DAO 记录集,在 Microsoft access 项目 (.adp) 中要求使用记录集时,将返回 ADO 记录集。 对于 Recordset 属性已经设置的使用 Visual Basic 的窗体,它进行的读/写行为取决于记录集 (ADO 或 DAO) 类型和包含在带有属性标识的记录集内的数据 (Jet 或 SQL) 类型。 在MDB中,默认情况下,Me.Recordset 是 DAO.Recordset 类型 如 dim rs as Dao.Recordset set rs=Currentdb.openrecordset(tblUserOfficeCn) set me.Recordset=rs 如果你希望使用ADODB.Recordset ,可使用下面方法。 在 Form_Open 里面加入一下代码 DGlobal rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm Suppliers Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open Select * From Suppliers, CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms(Suppliers).Recordset = rstSuppliers Forms(Suppliers).UniqueTable = Suppliers End Sub 注意 ADO Recordset.CursorLocation 属性必须设置为 adUseClient。 在属性表上 UniqueTable(唯一表)属性可在客户/服务器模式中使用,但不能用于 access 数据库 (.mdb)。此属性只能在 Visual Basic 代码中设置。 您可使用 Recordset 属性作如下操作:
1)将多个窗体连接为公用数据集。这种情况允许多窗体的同步处理。 例如: Set Me.Recordset = Forms!Form1.Recordset
2)使用窗体不直接支持的 Recordset 对象上的方法。 例如:当您想要通过 ADO 的 Find 方法或 DAO 的 Find 方法来使用自定义对话框查找记录时,您可以使用 Recordset 属性。
3)回绕一系列影响多窗体的编辑的事务处理(可以重作)。 当打开一个新的 Recordset 对象时,它的第一个记录就是当前记录。 另注意:如果您更改窗体的 RecordSource 属性,您必须使用 Set 语句。更改窗体的 Recordset 属性可能也将更改 RecordSource、RecordsetType 和 RecordLocks 属性。
本站涵盖的内容、图片、视频等数据系网络收集,部分未能与原作者取得联系。若涉及版权问题,请联系我们删除!联系邮箱:ynstorm@foxmail.com 谢谢支持!