点击或拖拽改变大小

Functions.VoDbRecall 方法

X#
如果当前记录被标记为删除,则恢复它。

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

返回值

类型:Boolean
如果成功则返回 TRUE;否则返回 FALSE。
备注
VODBRecall() 与 DBRecall() 相同。
但是,此函数不调用错误处理程序,因此如果失败,不会产生运行时错误消息或创建错误对象。因此,检查返回值以确定函数是否成功可能很重要。
全局结构 StrucErrInfo 将包含有关发生的任何错误的必要信息。有关更多信息,请参见 DBRecall()。
示例
以下示例在记录被删除时恢复它,并在成功时尝试锁定记录:
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("LastName", NIL, NIL)
13MemFree(rddList)
14IF (Sales->(VODBSeek(cLast)))
15    IF Sales->(VODBDeleted())
16        IF Sales->(RLock())
17            Sales->(VODBRecall())
18            ? "记录已恢复"
19        ELSE
20            ? "无法锁定记录..."
21        ENDIF
22    ENDIF
23ELSE
24    ? "未找到"
25ENDIF
参见