HCL Domino - Examples: CompactWithOptions method - Need a Domino Consultant? Call NotesMail +1 212-599-2048

HCLSoftware Business Partner Domino Consulting Services CRUCIAL Notes Tools +1 212-599-2048	Domino Consulting Services CRUCIAL Notes Tools Domino administration Notes development	Chat now
.

Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: CompactWithOptions method
1. This agent compacts TOOBIG.NSF using the options b, L, and S10.

Sub Initialize Dim session As New NotesSession Dim db As NotesDatabase Set db = session.GetDatabase("", "TooBig") If Not db.Isopen Then Messagebox "Could not open",, "TooBig" Exit Sub End If delta& = db.CompactWithOptions("bLS10") Messagebox delta&,, "Size difference in bytes" End Sub

2. This agent compacts TOOBIG.NSF using the same options.

Sub Initialize Dim session As New NotesSession Dim db As NotesDatabase Set db = session.GetDatabase("", "TooBig") If Not db.Isopen Then Messagebox "Could not open",, "TooBig" Exit Sub End If options& = CMPC_RECOVER_REDUCE_INPLACE + CMPC_NO_LOCKOUT delta& = db.CompactWithOptions(options&, "10") Messagebox delta&,, "Size difference in bytes" End Sub

See Also

CompactWithOptions method

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents