hi zusammen,
haben hier bei einem kunden das problem, das obwohl autosave ausgeschaltet ist immer brav eine as_username.nsf angelegt wird. und die belegt auch noch gleich jede menge platz. haben jetzt im terminate der bookmark einfach folgendes script eingebaut, das zumindest die dateigrösse wieder entsprechend verkleinert:
Dim s As New NotesSession
Dim autosave As NotesDatabase
Dim nname As NotesName
Dim directory As String
Dim as_fileName As String
'//init
Set nname = New NotesName(s.UserName)
directory = s.GetEnvironmentString("Directory", True)
as_fileName = s.GetEnvironmentString("AUTO_SAVE_USER," & nname.Abbreviated, True)
If (as_fileName = "") Then
Print "no AUTO_SAVE available"
Exit Sub
End If
If (Dir$(directory & "\" & as_fileName) <> "") Then
Print "get AUTO_SAVE '" & as_fileName & "'"
Set autosave = s.GetDatabase("", as_fileName)
Print "compact AUTO_SAVE '" & as_fileName & "'"
Call autosave.Compact()
End If