ACCESSのフィールドデータの照合について

質問

テーブルAのフィールドAとテーブルBのフィールドBの文字をAを基準に1文字づつ全文字を照合しアンマッチ文字が3文字以上発生したら-1を１及び2文字発生は１を全て照合ＯＫなら数字の０をクエリで行いたいのですが・・・
最大21文字照合となります。
テーブルＢのデータは手書文字をＯＣＲ変換した物でＡＣＣＥＳＳ２０００のマスターデータと照合しています。

回答No.1

ShowMeHow · ベストアンサー

function CompareStrings(strA,strB) as integer
comparestrings = 0
for i = 0 to len(strA)-1
if mid(stra,i,1) <> mid(strb,i,1) then comparestrings = comparestrings + 1
next i
end function

上記のようなファンクションを作って、クエリから指定したらいかがでしょうか？
（普通に使うためには長さが違うときの処理も考えておかなくてはいけないけど。）

お礼

お礼が遅くなり申し訳ありません。
ループ処理をクエリで指定することにより出来ました。
ありがとうございます。

回答No.3

mitarashi

少々大げさかもしれませんが、文字列の類似度を表す、レーベンシュタイン距離というのを使うと良いかもしれません。ご参考まで。
http://okwave.jp/qa/q6060346.html

お礼

決算処理でお礼が遅くなり申し訳ありません。
レーベンシュタイン距離初めて知りました。
ありがとうございます。
又、よろしくお願いします。

回答No.2

layy

レコードの照合キーがあれば、クエリで

照合Ａ：[テーブルA].[フィールドA]
照合Ｂ：[テーブルB].[フィールドB]
結果：ocrcomp（[照合Ａ],[照合Ｂ]）

ocrcomp関数を自作する。
引数２つ取得して、その機能要件にあうようロジックを作成、
結果フラグを返す。
サイズが大きい方で１文字ずつループ、か
マスタ側基準で１文字ずつループ、でもいいでしょう。

お礼

決算処理でお礼が遅くなり申し訳ありません。
ループ処理をクエリで指定して出来ました。
又、宜しくお願いします。