-
Topic
-
We have an applet which gathers data from the AddressBook and inserts a “signature block” into an e-mail. Here is the insertion code:
If (GWEvent = “GW#C#COMPOSE” or GWEvent = “GW#C#FORWARD”) then
Call GroupWise.FocusSet(10, “”)
GroupWise.PosTextTop
GroupWise.TypeText(Chr(10) & Chr(10) & FullName)
GroupWise.TypeText(Chr(10) & Title)
GroupWise.TypeText(Chr(10) & CompanyName)
GroupWise.TypeText(Chr(10) & Street)
GroupWise.TypeText(Chr(10) & City & “, ” & State & ” ” & Zip)
GroupWise.TypeText(Chr(10) & “Phone: ” & Phone)
GroupWise.TypeText(Chr(10) & “Fax: ” & FaxNum)
GroupWise.TypeText(Chr(10) & “Email: ” & LCase(Email))
GroupWise.TypeText(Chr(10) & “Website: ” & Website)
Groupwise.Enter()
GroupWise.PosTextTop
Call GroupWise.FocusSet(0, “”)Elseif (GWEvent = “GW#C#REPLY”) then
Call GroupWise.FocusSet(10, “”)
GroupWise.PosTextTop
GroupWise.TypeText(Chr(10) & Chr(10) & FullName)
GroupWise.TypeText(Chr(10) & Title)
GroupWise.TypeText(Chr(10) & CompanyName)
GroupWise.TypeText(Chr(10) & Street)
GroupWise.TypeText(Chr(10) & City & “, ” & State & ” ” & Zip)
GroupWise.TypeText(Chr(10) & “Phone: ” & Phone)
GroupWise.TypeText(Chr(10) & “Fax: ” & FaxNum)
GroupWise.TypeText(Chr(10) & “Email: ” & LCase(Email))
GroupWise.TypeText(Chr(10) & “Website: ” & Website)
Groupwise.Enter()
GroupWise.PosTextTop
Else
Call MsgBox(“No GroupWise message was found for signature insertion.”, 64, CAPTION)
End IfWhen the GroupWise default compose view is set to plain text, the block inserts correctly as in:
My name
My Title
Company Name
Blah, blah, blahHowever, when the default compose view is set to HTML, the block inserts as above ONLY when replying. When composing or replying the block inserts as follows:
My nameMy Title
Company Name
Blah, blah, blahNOTE the extra line break between My name and My Title. Any ideas how to make this not happen?
- You must be logged in to reply to this topic.