FrontPage VBA教程:commit方法

对自从创建 UndoTransaction对象以来添加到撤消堆栈的操作序列执行 UndoTransaction对象。例如,如果您创建了 UndoTransaction对象,然后运行宏,commit方法允许宏继续运行;或者,如果宏已完成,则 commit方法可防止宏效果回滚。也就是说,宏的操作序列已经提交而无法回滚。

expression.commit

expression  该表达式返回 FPHTMLUndoTransaction对象。

返回类型

Void

VBA示例

下列示例创建事务处理,执行将操作添加到堆栈中的操作,然后要求用户响应以决定是放弃操作还是提交操作。


Private Sub CreateTransaction()
Dim myTrans As FPHTMLUndoTransaction
Dim myDoc As FPHTMLDocument
Dim myUTransName As String
Dim myMsg As String
Set myDoc = ActiveDocument
myUTransName = "Undo Last Macro"
Set myTrans = _
    myDoc.createUndoTransaction(myUTransName)
myMsg = "Would you like to cancel the operation?"
Call myDoc.body.insertAdjacentHTML("BeforeEnd", _
    "<b> Added by FP Programmability </b>")
Answer = MsgBox(myMsg, vbYesNo, "Cancel Operation?")
If Answer = vbYes Then
    myTrans.abort
Else
    myTrans.commit
End If
End Sub

上页:FrontPage VBA教程:Close方法 下页:FrontPage VBA教程:Copy方法

FrontPage VBA教程:commit方法

FrontPage VBA教程:Copy方法 FrontPage VBA教程:createElement方法
FrontPage VBA教程:createStyleSheet方法 FrontPage VBA教程:createStyleState方法
FrontPage VBA教程:createUndoTransaction方法 FrontPage VBA教程:Delete方法
FrontPage VBA教程:Edit方法 FrontPage VBA教程:elementFromPoint方法
FrontPage VBA教程:execCommand方法 FrontPage VBA教程:getBotAttribute方法
FrontPage VBA教程:LocateFile方法 FrontPage VBA教程:LocateFolder方法
FrontPage VBA教程:LocatePage方法 FrontPage VBA教程:MakeAbs方法
FrontPage VBA教程:MakeRel方法 FrontPage VBA教程:MakeWeb方法
FrontPage VBA教程:Move方法 FrontPage VBA教程:OnTime方法
FrontPage VBA教程:Open方法 FrontPage VBA教程:ParseURL方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号