Functions.VoDbCloseArea 方法 | |
关闭工作区中的所有文件。
命名空间:
XSharp.RT
程序集:
XSharp.RT (在 XSharp.RT.dll 中) 版本:2.22 GA
语法 FUNCTION VoDbCloseArea() AS LOGIC
public static bool VoDbCloseArea()
查看代码返回值
类型:
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() |
示例
以下示例通过别名引用关闭文件:
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()
参见