Genii Software | BlogNew

Genii Software - Coexistence solutions and rich text tools

Home

About Genii

Products

Downloads

News & Events

Support

Weblog

January, 2009
December, 2008
November, 2008
October, 2008
September, 2008
August, 2008

Show all 69 months

Search the weblog

Ben Langhinrichs

- Ben Langhinrichs

Photograph of Ben Langhinrichs

©2003-2009 Genii Software Ltd. All rights reserved. The rights to all logos, images, etc. are owned by their respective owners.

The views expressed in this weblog are mine alone, but since I am President and Owner, they necessarily also reflect the views of Genii Software, Ltd.

January, 2009
December, 2008
November, 2008
October, 2008
September, 2008
August, 2008
July, 2008
June, 2008
May, 2008
April, 2008
March, 2008
February, 2008
January, 2008
December, 2007
November, 2007
October, 2007
September, 2007
August, 2007
July, 2007
June, 2007
May, 2007
April, 2007
March, 2007
February, 2007
January, 2007
December, 2006
November, 2006
October, 2006
September, 2006
August, 2006
July, 2006
June, 2006
May, 2006
April, 2006
March, 2006
February, 2006
January, 2006
December, 2005
November, 2005
October, 2005
September, 2005
August, 2005
July, 2005
June, 2005
May, 2005
April, 2005
March, 2005
February, 2005
January, 2005
December, 2004
November, 2004
October, 2004
September, 2004
August, 2004
July, 2004
June, 2004
May, 2004
April, 2004
March, 2004
February, 2004
January, 2004
December, 2003
November, 2003
October, 2003
September, 2003
August, 2003
July, 2003
June, 2003
May, 2003

Show only recent months

Ben Langhinrichs

- Ben Langhinrichs
Technorati Profile

Photograph of Ben Langhinrichs

©2003-2008 Genii Software Ltd. All rights reserved. The rights to all logos, images, etc. are owned by their respective owners.

The views expressed in this weblog are mine alone, but since I am President and Owner, they necessarily also reflect the views of Genii Software, Ltd.

Genii Weblog

Minimalist coding

Tue 14 Oct 2003, 11:47 PM

How short is your shortest useful agent?  This one I wrote today converts Notes bitmaps to GIF format for every rich text field on the current document (there are several rich text fields in this form which might have images).  The full code is:

'Convert Bitmaps to GIFs for all:

Option Public
Option Declare
Uselsx "*lsxrtc"

Sub Initialize
   Dim session As New NotesSession
   Dim doc As NotesDocument
   Dim gSession As New GeniiSession

   Set doc = session.DocumentContext

   On Event ActOnItem From gSession Call ConvertBitmaps
   Call gSession.BatchBackend(doc.Handle, "*")
End Sub

Sub ConvertBitmaps(Source As GeniiSession, Byval action As String, Byval properties As String, skipnote As Integer, continue As Integer)
   Print "Converting bitmaps in " & Source.BatchRTItem.Fieldname
   Call Source.BatchRTItem.Everything.ConvertBitmaps
End Sub

You don't get much shorter.  Maybe I should comment it or something.

What has been said:

58.1. Jens-Christian Fischer (10/15/2003 08:52 AM)

I. need. this.

This is the 3.20, right?

58.2. Ben Langhinrichs (10/15/2003 11:11 AM)

Yes, that's Version 3.20. I guess I should post a "What's New in 3.20" summary. It will be out shortly.

Have your say: