GetString 方法 (ADO Recordset)
时 间:2016-11-07 12:20:49
作 者:MDZZ ID:47512 城市:南京
摘 要:GetString 方法 (ADO Recordset)
正 文:
GetString 方法 (ADO Recordset)
将 Recordset 作为字符串返回。语法
Set xxx= recordset.GetString(StringFormat, NumRows, ColumnDelimiter, RowDelimiter, NullExpr)
返回值
将 Recordset 按字符串值的变体型 (BSTR) 返回。
参数
StringFormat 指定 Recordset 应转换为下列格式。
常量 说明
adClipString 行由 RowDelimiter 分界,列由 ColumnDelimiter 分界,NULL 值由 NullExpr 分界。这三个参数只有在与 adClipString 一起时才有效。
umRows 可选。记录集要转换的行数。如果没有指定 NumRows,或者它大于记录集的总行数,则记录集的所有行都要转换。
ColumnDelimiter 可选。如果指定则为列与列之间的分界符,否则为 TAB 字符。
RowDelimiter 可选。如果指定则为行与行之间的分界符,否则为 CARRIAGE RETURN 字符。
说明
行数据(但不是模式数据)保存在串中。因此不能使用该字符串重新打开记录集。
该方法等价于 RDO GetClipString 方法
以下是简单的应用
附上 网友写的 此种办法通用函数
Public Function DMerge(Exps As String, Domain As String, _
Optional Criteria As String, Optional Separator As String = ";") As String'函数功能: 合并指定记录集指定字段值为一个字符串
'参数说明:
' exps : 要合并的字段
' domain : 来源表或查询
' criteria : 可选,限制记录的条件表达式
' Separator : 可选,合并记录的分隔符,默认为分号(;)
'
'调用示例: DMerge("姓名","人员表","性别='" & [性别] & "'",Chr(13) & Chr(10))
' 以上示例在查询中,使用了换行分隔符,返回换行显示的姓名
'作 者: t小雨
'创建时间: 2009/11/25
On Error Resume Next
Dim rst As New ADODB.Recordset
Dim strSQL As String
strSQL = "Select " & Exps & " From " & Domain
If Criteria <> "" Then strSQL = strSQL & " Where " & Criteria
rst.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockReadOnly, adCmdText
If Not rst.EOF Then DMerge = rst.GetString(adClipString, , , Separator)
rst.Close
Set rst = Nothing
End Function
Access软件网官方交流QQ群 (群号:483923997) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- Access两种方式实现即时更...(03.01)
- Access隐藏与显示lacc...(01.12)
- 【Access高效办公】将每个...(12.23)
- Access21点游戏源代码(12.13)
- 【Access窗体导出Exce...(11.15)
- 【Access开发】Acces...(11.14)
- 通过Access宏录入数据到选...(11.10)
- 用DLOOKUP函数将需求表中...(10.31)
- Access日期区间段查询数据...(10.25)
学习心得
最新文章
- Access快速开发平台--在WI...(03.08)
- 使用SQL语句删除xscj表中学号...(03.08)
- Access快速开发平台进销存教程...(03.07)
- Access快速开发平台--frm...(03.06)
- 【Access删除查询】删除数字最...(03.06)
- Access快速开发平台进销存教程...(03.05)
- Access快速开发平台进销存教程...(03.04)
- Access快速开发平台--IsL...(03.02)
- Access两种方式实现即时更新月...(03.01)
- Access开发的资金管理系统;基...(02.29)