使用中间函数的 BizTalk 脚本 Functoid答案

【问题标题】：BizTalk Script Functoid using a mid fuction使用中间函数的 BizTalk 脚本 Functoid
【发布时间】：2010-07-07 19:47:35
【问题描述】：

我是 BizTalk 的新手，正在寻找如何在脚本 functoid 中使用 vb.net mid 函数的示例。

【问题讨论】：

标签： biztalk biztalk-mapper

【解决方案1】：

我总是建议先在常规 Visual Studio 中编写和测试您的函数，然后如果需要，将函数复制到映射 functoid 中。这样做的原因是充分利用了智能感知（自动完成）、调试、sytnax 检查等...... - 所有这些都在小映射 functoid 框中缺失。

注意：您还可以在 Visual Studio 中将模块保存为 .DLL，然后从 functoid 调用 .DLL。然后，您可以为您的所有映射 functoid 构建一个越来越大的 .DLL 自定义库。

Visual Studio 中的示例：

Module Module1

    Sub Main()
        Dim demoString As String = "abcdef"
        Console.WriteLine("result=" & DemoFunction1(demoString))
        Console.WriteLine("result=" & DemoFunction2(demoString))

    End Sub

    Function DemoFunction1(ByVal textin As String) As String
        Dim textout As String
        textout = Mid(textin, 3, 4)
        Return textout
    End Function

    Function DemoFunction2(ByVal textin As String) As String
        Dim textout As String
        textout = textin.Substring(2, 4)
        Return textout
    End Function

End Module

例如，如果您传递一个值“abc”，则该函数将炸弹。所以这可能表明您需要在执行 MID 功能之前测试字段的长度。

您要么执行旧式 MID 函数，要么执行较新的 VB.NET .Substring 函数。我已经在上面的示例中展示了两者。 substring 函数的偏移量为零，但 MID 的偏移量为 1。

您要复制到 functoid 中的代码块是：

Function DemoFunction1(ByVal textin As String) As String
    Dim textout As String
    textout = Mid(textin, 3, 4)
    Return textout
End Function

【讨论】：