Web attachments

On webquerysave, i want to extrract the attachments uploaded via file upload control. Purpose is, like all other posts here, I want to re-embed the attachment to a richtext field.

However, i always get a ‘user defined error’ on the line that extracts the attachment.

I only get this kind of problem with attachments from the web.

With attachments from a notes client, this piece of code works perfectly.

Any ideas?

Dim AttNameArr

	AttNameArr = Evaluate("@AttachmentNames",currDoc)

	

	Dim AttCtr As Integer 

	For AttCtr = Lbound(AttNameArr) To Ubound(AttNameArr) 

		Dim obj As NotesEmbeddedObject 

		Set obj = currDoc.GetAttachment(AttNameArr(AttCtr))

		

		obj.ExtractFile obj.Source

	Next

Subject: web attachments

Could be an access issue - does your agent have level 2+(Allow Restricted Operations) access? And the agent signer have the correct server doc rights? (run UnRestricted Lotusscript - never can get my mind around the naming of this compared to the agent description)

Remembering that locally the user has the ability to save files to their computer - on the web this process has to occur on the server which requires a higher access (if allowed at all).

http://www.stevecastledine.com