Well, it is working now by promoting/writing all the context items of the
incoming message, as well as the message type:
For i = 0 To (pInMsg.Context.CountProperties - 1)
Dim strName As String = ""
Dim strNamespace As String = ""
Dim propertyValue As Object = Nothing
propertyValue = pInMsg.Context.ReadAt(i, strName,
strNamespace)
If pInMsg.Context.IsPromoted(strName, strNamespace) Then
outMsg.Context.Promote(strName, strNamespace,
propertyValue)
'System.IO.File.WriteAllText("c:\abf\output\Promoted"
&
i & ".txt", strName & " " & strNamespace & " " & propertyValue.ToString)
Else
outMsg.Context.Write(strName, strNamespace,
propertyValue)
'System.IO.File.WriteAllText("c:\abf\output\Written" &
i
& ".txt", strName & " " & strNamespace & " " & propertyValue.ToString)
End If
Next
The PROBLEM now is that the Receive shape only processes the first message
in the Batch. All the messages do get dequeued by the receive shape, but
all
but the first message disappear. I tried to set the receive shape as
'Activate = True', but I received errors when I compiled the application.
I can not locate the non-processed messages in the administration/Hat
tool.
They seem to just be gone.
Any help would be appreciated!
"Jan Eliasen" wrote:
> On Wed, 13 Dec 2006 09:19:03 -0800, Tiz
> <Tiz@[EMAIL PROTECTED]
> wrote:
>
> >The problem comes with routing the message back to the appropriate ****t
> >after I have intercepted it. I have promoted the "MessageType"
property
> >(along with trying numerous other), and it always fails.
> My best bet would be that you have a case-error in either the
> namespaceURI or the rootelement?
> I mean, some character is in lower case instead of upper case or the
> other way around.
>
> --
> eliasen, representing himself and not the company he works for.
>
> Private blog: http://blog.eliasen.dk
>
> Private email: jan@[EMAIL PROTECTED]
>


|