URLEncode

過去に以下のような LotusScript 関連の記事を書きましたが、Evaluate の部分の文字列の渡し方がいっつも書き間違えてしまいます。

Soundex
Evaluate を使いこなそう

なので、URLEncode の Function 例を実際に書いてしまいましょう。
これをコピー＆ペーストすれば使いやすいかと思います。

    Function URLEncode(source As String, encodetype As String) As String
        macro$ = "@URLEncode(""" & encodetype & """;""" & source & """)"
        tmp = Evaluate(macro$)
        URLEncode = tmp(0)
    End Function