HCL Domino - Examples: Compact 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: Compact method
1. This script compacts WHITESPC.NSF if less than 85% of its disk space is occupied by real data.

Dim db As New NotesDatabase( "", "whitespc.nsf" ) If ( db.PercentUsed < 85 ) Then Call db.Compact End If

2. This script compacts TOOBIG.NSF if less than 90% of its disk space is occupied by real data. It displays a message indicating the number of bytes that have been freed.

Dim db As New NotesDatabase( "", "toobig.nsf" ) Dim delta As Long If ( db.PercentUsed < 90 ) Then delta = db.Compact Messagebox( "You've freed " & delta & " bytes" ) End If

See Also

Compact method

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents