0

VB.NETにて出力する文章に雛形を用意し、その雛形の # に番号を当てはめようとしました。

<script runat="server" language="vb">
    function checkcode(s as String) as String
        System.Text.Encoding.UTF8.GetBytes(s) ' => 50
        System.Text.Encoding.UTF8.GetBytes("#") ' => 35
        Dim result as String = "(" + s + ") ###"
        result = result.replace("#","XX")
        return result
    end function

function checkcode2(s as String) as String
    Dim result as String = "(" + s + ")"
    return result
end function
</script>
<%
    body = "XXXXXXXXX Page #/#/# XXXXXXXXX"
    Dim reg As New Regex("(#)")

    REM Pattern 1
    body = reg.replace(body,checkcode("$1")) 

    REM Pattern 2
    body = body.Replace("#","!") 
%>

のようなコードを書き、(Pattern 1のとき)

XXXXXXXXX Page (XX) XXXXXX/(XX) XXXXXX/(XX) XXXXXX XXXXXXXXX

という結果を期待しました。しかし、これで得られる結果は

XXXXXXXXX Page (#) XXXXXX/(#) XXXXXX/(#) XXXXXX XXXXXXXXX

でした。そこで、checkcode2 に投げてみると、 (#) が帰ってきます。
が、この時 s に入っている # を GetBytes で取得し、 # 部分の文字コードを見てみると 50 になっているのです。&#50;は 2 なので、期待値でもありません。

そこで、(Pattern 2)で置換してみると、こちらは問題なく置換ができました。
この時の文字コードは 35 で、HTML上で &#35; と打てば # が出てきますので想定どおりです。

何故 Regex.Replace を通すと、 # が 35から50に変わってしまうのでしょうか。
お昼から悩み続けて解決できず・・・よろしくお願いします。

---------------------------------19:00 追記

例えば、 s を強制的に # の文字列に置き換えてみました。

<!doctype html>
<html>
<head>
<script runat="server" language="vb">
    function checkcode(s as String) as String
        Dim result as String = "(" + s + ") ###"
        result = result.replace("#","XX")
        return result
    end function


    function forcesharp(s as String) as String
        Dim result as String = "(#) ###"
        result = result.replace("#","XX")
        return result
    end function
</script>
</head>
<body>

<%
    Dim body as String = "XXXXXXXXX Page #/#/# XXXXXXXXX"
    Dim reg As New Regex("(#)")
%>
    <%= reg.replace(body,checkcode("$1")) %>
<hr />
    <%= reg.replace(body,forcesharp("$1")) %>

</body>
</html>


結果
XXXXXXXXX Page (#) XXXXXX/(#) XXXXXX/(#) XXXXXX XXXXXXXXX
------------------水平線--------------------
XXXXXXXXX Page (XX) XXXXXX/(XX) XXXXXX/(XX) XXXXXX XXXXXXXXX

forcesharp も checkcode も s には # が入っているはずですが、 s をそのまま使っているcheckcodeは # なのに置換されていません。
一方 forcesharp は s を使わず # の文字を改めて手入力していることも有り、正しく置換されています。
バイトコードに置き換えると、手入力したシャープは 35、パターンマッチで取り出したシャープは 50 となっていますが、そもそも手入力した # を検出しているはずなので # は 35のはず。
--------------------------------問題点が判明しました。
Perl頭で合ったことが原因のようでした。
Perlでは $body=~s/(#)/checkcode($1)/egsi; のように、$1 には # が入ってくるので、思い込みからこのトラブルが発生していました。
reg.replace(body,checkcode("$1"))は #ではなく $1が送られている、が原因でした。
--------------------------------解決策
現在以下のページを参考に、想定していた動作のする手段で続行しています。
https://msdn.microsoft.com/ja-jp/library/system.text.regularexpressions.matchevaluator(v=vs.110).aspx

1 件の回答 1

1

パターン1のcheckcodeの内部の計算は"($1) ###".Replace("#", "XX")に纏められますが、この String.Replaceでは正規表現を考慮しませんので、結果は"($1) XXXXXX"となり、結局

Dim reg As New Regex("(#)")
reg.Replace("XXXXXXXXX Page #/#/# XXXXXXXXX", "($1) XXXXXX")

が評価されます。regbody中の三か所の#にマッチし、それぞれの最初のグループにはregで括弧が指定されている#がキャプチャされます。これが置換文字列中の$1を置換するため各置換結果は"(#) XXXXXX"となり、文字列全体では

XXXXXXXXX Page (#) XXXXXX/(#) XXXXXX/(#) XXXXXX XXXXXXXXX

となります。

おそらく置換文字列側に「番号」を埋め込んでからreg.Replaceを呼び出す必要があるのでは。

追記

コメントで誤解のポイントが分かったので追記しますが、.NETの関数は引数に指定した式の計算結果のみを受け取ります。ソースコード自体に文字列置換を行ってから評価するといったことは起こりません。

比較的元の意図に近い解決策としてはデリゲートを使うものがあります。
Regex.Replaceには第二引数にMatchEvaluatorを受け取るものがあり、このデリゲートの実行結果が1個のマッチの置換結果となります。このデリゲート内でMatch.Resultメソッドを使用すれば置換文字列の展開が出来て、

reg.Replace(body, Function(m) checkcode(m.Result("$1")))

のように"$1"を評価してからcheckcodeに渡すことが出来ます。

9
  • すいません、質問がわるかったようです。書き換えます。 Commented 2016年10月20日 9:49
  • 簡単に言うと、問題はそこではなく、Regexのマッチした文字列 #(35) が、なぜか #(50) になって帰ってきてしまう、という問題でして。作例が悪かったのは申し訳ないです。 Commented 2016年10月20日 9:55
  • おそらくString.ReplaceRegex.Replaceを混同されているのでは。
    – pgrho
    Commented 2016年10月20日 10:06
  • そもそも手段が違う、ということでしょうか? # 以外にも色々と必要で、後方参照の結果次第で置き換える文字が変わってきたりします。 Commented 2016年10月20日 10:12
  • 修正有難う御座います。理解していないのか、的を得ていないような感覚を受けています。 Commented 2016年10月20日 10:18

この質問に回答するには、ログインする必要があります。

求めていた回答ではありませんか? のタグが付いた他の質問を参照する。