点击或拖拽改变大小

DbServer.BLOBRootPut 方法

X#
将数据存储在 BLOB 文件的根区域。

命名空间:  VO
程序集:  VORDDClasses (在 VORDDClasses.dll 中) 版本:2.22 GA
语法
 VIRTUAL METHOD BLOBRootPut(
	uBlob
) AS USUAL CLIPPER
查看代码

参数

uBlob (Optional)
类型:__Usual
您要放入 BLOB 文件根区域的数据。uBLOB 可以是任何 X# 常用数据类型,代码块和对象除外。

返回值

类型:__Usual
如果成功则返回 TRUE;否则返回 FALSE。
备注
DBServer:BLOBRootPut() 允许将一个(且仅一个)数据存储到 BLOB 文件的根区域(此数据没有大小限制)。 存储新数据后,DBServer:BLOBRootPut() 会释放与先前存储在 BLOB 文件根区域中的任何数据关联的空间。
提示 提示:
由于根数据不引用数据服务中的特定记录,因此不受 DBServer:RLock() 的影响,也不受 DataServer:ConcurrencyControl 设置的影响。 因此,如果数据服务以共享模式打开,则在调用 DBServer:BLOBRootGet() 之前应使用 DBServer:BLOBRootLock()。
示例
此示例使用 DBServer:BLOBRootPut() 在修改后将系统设置存储到BLOB文件:
X#
 1FUNCTION UpdateSettings()
 2LOCAL aSettings AS ARRAY
 3LOCAL oDBCust AS DBServer
 4
 5oDBCust := Customer{}
 6
 7IF oDBCust:BLOBRootLock()
 8// 获取任何现有设置
 9aSettings := oDBCust:BLOBRootGet()
10
11IF Empty(aSettings)
12// 此函数将使用默认数据填充aSettings
13aSettings := oDBCust:GetDefaultSettings()
14ENDIF
15
16// 此函数将允许用户修改设置。
17IF oDBCust:ModifySettings(aSettings)
18// 最后,存储设置
19oDBCust:BLOBRootPut(aSettings)
20ENDIF
21
22oDBCust:BLOBRootUnlock()
23ELSE
24aSettings := {}
25Alert("无法获取根锁")
26ENDIF
27
28oDBCust:Close()
29
30RETURN aSettings
参见