Gem.Rhenen

[Gem.Rhenen]

The script is working perfectly, but sometimes, with some specific users, we get the DISCLAIMER in the middle of the text.
In spite of the fact that we use the line “Call GroupWise.PosToEndOfText”.

How can we force the DISCLAIMER to be definitely at the bottom of our email?

[Gem.Rhenen]

any reaction yet?

[Gem.Rhenen]

If I use the same script “on send”, the composed message is to be forwarded to “ARCHIVE@test.com”. Unfortunatly this is not working as of now. Please provide sample script for this, or a mod. on the existing script.

[Gem.Rhenen]

It works fine now, thanks for your support. You can look forward to an order for 100 more clients.

[Gem.Rhenen]

Only ScriptRecorder.dll exists on both machines

[Gem.Rhenen]

‘——————————————————————————-
‘ Insert your comments here
‘——————————————————————————-

Sub Main(Client, GWEvent)
Dim objDraft
Dim objEmail
Dim objRecipient
Dim Archief

‘ Maak een nieuw bericht
Set objDraft = GoupWise.Account.MailBox.Messages.Add(4)

‘ Voeg een ontvanger in
Archief = “test@test.com
objRecipient = objDraft.Recipients.Add(Archief,,0)

‘ Voeg parameters toe
Set Msg = Client.ClientState.CommandMessage

objDraft.Subject = “Archivering gewenst”
objDraft.BodyText.PlainText = “Graag dit bericht archiveren.”

‘ call objDraft.Attachments.Add(Msg, “Test”)

‘ Verstuur het bericht dmv de verzend methode
Set objEmail = objDraft.Send

‘ Verzend bevestiging
Call MsgBox(“Dank U.”, 64, “Bericht verzonden.”)
End Sub

=============================================
In this case the message is generated, and send to the recipient, as soon as I enable the attachment line (call objDraft.Attachments.Add(Msg, “Test”)) the message is not send, but comes back into my own mailbox as a draft without recipient. Can you please provide me with a working script to attach the original message and send it to a single recipient (in this case test@test.com).

An other problem I have is that: when I do not have a message selected it fails on the following line:

Set Msg = Client.ClientState.CommandMessage

How can I check if there is a message selected?

Thanks already for your help so far.

[Gem.Rhenen]

Const CAPTION = “Requested Message”
Call Msgbox (“Done”, 64, CAPTION)

[Gem.Rhenen]

Then body text was: “An unknown error has occured”. I tried this on 2 PC’s (windows2000prof and windowsXPprof). Both give the same error.

Thanks

[Author]

Replies