点击或拖拽改变大小

Functions.VoDbCloseArea 方法

X#
关闭工作区中的所有文件。

命名空间:  XSharp.RT
程序集:  XSharp.RT (在 XSharp.RT.dll 中) 版本:2.22 GA
语法
 FUNCTION VoDbCloseArea() AS LOGIC
查看代码

返回值

类型:Boolean
如果成功则返回 TRUE;否则返回 FALSE。
备注
VODBCloseArea() 与 DBCloseArea() 相同。
然而,此函数不调用错误处理程序,因此不会在失败时产生运行时错误消息或创建错误对象。因此,检查返回值以确定函数是否成功可能很重要。
全局结构 StrucErrInfo 将包含有关发生的任何错误的必要信息。有关更多信息,请参见 DBCloseArea()。
备注
This function is like DBCloseArea(). 这个函数,不会调用错误处理程序,因此如果失败,不会产生运行时错误消息或创建错误对象。 因此,检查返回值以确定函数是否成功是很重要的。

LastRddError 属性将包含关于发生的任何错误的必要信息。
提示 提示:
VoDbCloseArea() and CoreDb.CloseArea() are aliases


提示 提示:
VoDbCloseArea() is an alias for CoreDbCloseArea()
示例
以下示例通过别名引用关闭文件:
X#
 1LOCAL rddList       AS _RDDLIST
 2...
 3aRdds := {"CAVODBF", "DBFNTX"}
 4n       := ALen(aRdds)
 5rddList := MemAlloc( (_SizeOf(DWORD)) + (n * _SizeOf(SYMBOL)) )
 6rddList.uiRddCount := n
 7FOR i := 1 TO n
 8    rddList.atomRddName[i] := SysAddAtomUpperA(aRdds[i])
 9NEXT
10cLast := "Winston"
11VODBUseArea(TRUE, rddList, "sales", "sales", TRUE, FALSE)
12VODBOrdListAdd("Last", NIL)
13MemFree(rddList)
14IF (VODBSeek(cLast))
15    IF Deleted() .AND. RLock()
16        VODBRecall()
17        ? "已删除记录: ", Deleted()
18    ENDIF
19ELSE
20    ? "未找到"
21ENDIF
22VODBCloseArea()
参见