Cannot create attachments

Hi all,

I have a strange problem.

Have a company application, developed with R5, 2 weeks ago upgraded servers and clients to 6.5.2.

Everything works fine excepts that in our main Form there are a lot of RTF and I cannot attach files.

Better explained: I position the cursor in the RTF, I select File - Attach to attach the desired file (i.e. a .doc), I open the file from notes to check if is the right one. Ok. It’s the I wanted.

Now I save the document. close it, reopen and I see the attachment. I right-click it, select view and voilà an error is raised:

Invalid or nonexistent document: Could not save to file C:\Temp\notes6030C8\filename.doc

The document is saved using a button with this formula in it:

@If( @Command([FileSave]); @Command([EditDocument]; 0); 0)

Then in the querysave event I have lot of controls (LS).

But what strange is, is that when I attach something and use the Notes built-in save action then the attachment is correctly created!!

Another information: when I try to delete a failed attachment this information message appears:

“The document is already locked by someone else.”

I have tried to deactivate the “Allow document locking” in db properties, then attachments runs correctly.

All this have ran in R5.

Thank you for any hint or help

best regards

E. Dominguez

SISA Studio Informatica SA

Subject: Cannot create attachments

If in my save action button I insert only the command@Command( [FileSave] );

then attachments are created correctly.

But how to get the edited document in read mode after the save without problems?

Subject: RE: Cannot create attachments

even if I put the @Command([EditDocument];0) in the postsave event the attachment save runs.

Is this a limitation or a bug?

Subject: RE: Cannot create attachments

You said, “even if I put the @Command([EditDocument];0) in the postsave event the attachment save runs.” I don’t understand what this means and why you think it’s a problem.

You want an action button to save the document, then switch it to read mode. You can do this in LotusScript as follows:

Sub Click(Source As Button)

Dim wksp As New NotesUIWorkspace

Dim session As New NotesSession

Dim uidoc As NotesUIDocument

Dim doc As NotesDocument

Dim db As NotesDatabase

Set uidoc = wksp.CurrentDocument

On Error Goto nevermind

uidoc.Save

On Error Goto 0

Set doc = uidoc.Document

uidoc.Close(True)

Call wksp.EditDocument(False, doc)

nevermind:

Exit Sub

End Sub