VBSCriptでの比較関数

Question

二つのメールアドレスを比較して一致したら"一致しました。"という
結果を返す関数を完成させたいです。どのように組めばいいのかご教示いただけますでしょうか。
'
a = "[e-mail]"
b = "[e-mail]"

ret = matchMailAddress( a, b)
WScript.echo ret

Function matchMailAddress( str1, str2 )
'<コードを埋めてください>
end function

Answer 1

こんなんでいいんでしょうか。

Function matchMailAddress( str1, str2 ) 
	ret = ""
	if str1 = str2 then
		ret = "一致しました"
	end if
	matchMailAddress = ret
end function

Comments

[goldenbad]

大文字小文字は区別しない状態で動かすと動きますか？

[ttyp03]

やってみればわかると思いますが、この方法だと区別します。
区別しないで比較させたい場合は、いくつか方法があります。
１、小文字か大文字に変換して比較する
if LCase(str1) = LCase(str2) then
２、StrCompを使用する
if StrComp(str1, str2, vbTextCompare) = 0 Then

[goldenbad]

if StrComp(str1, str2, vbTextCompare) = 0 Then
このような記述だとどうなるでしょうか？

[ttyp03]

大文字小文字を区別しない比較です。

[goldenbad]

vbTextCompereは変数宣言しないといけないですか?

[ttyp03]

いえ、宣言しなくても使えます。たぶん。
当方Windows7環境ですが、使えてます。

[goldenbad]

調べてみましたらvbTextCompereは定数値なので宣言なくてもよさそうです。

[goldenbad]

vbTextCompereの定義が必要であるので、サンプルスクリプトをご提示いただけますでしょうか。

[goldenbad]

すみません、vbTextCompare　= １と宣言すればテキストで比較ができます。解決いたしました。

[ttyp03]

自己解決ありがとうございます。
参考までにOS（Windowsのバージョン）を教えていただけますか？
前にも書きましたが、Windows7では宣言なしで使えているので。

[goldenbad]

windows 7ですね。ただ今回は10でも使われているので、念のため宣言はしたほうがよさそうです。

[ttyp03]

あくまでも"念のため"ということですね。
ありがとうございます。