型エラーについて

質問

環境
　ＩＩＳ４．０
　ＷＩＮ　ＮＴ
　ＶＢ６．０

ASPからDLLを使用して処理を行っている際に
以下のような事象が発生しました。

ＶＢ（ＤＬＬ）側で処理を行い、その結果をＡＳＰで受け取る時に
エラーが出ております。
ＡＳＰではすべてVariant型なのでＶＢでもVariant宣言しているのに
何故か型エラーが出ています。

ＡＳＰ部分をＶＢで記述すると問題なく動作します。

解決方法など分かりましたらご教授願います。

以下コードの一部分を抜粋いたしました。
▼▼▼▼▼▼▼▼▼ＡＳＰ▼▼▼▼▼▼▼▼▼
Dim DBErrField()

DBErrField = clsSEND_SCHEDULE_T.DBErrField
▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲

▼▼▼▼▼▼▼▼▼ＶＢ（DLL）▼▼▼▼▼▼
Private mDBErrField() As Variant

Public Property Get DBErrField() As Variant()

DBErrField = mDBErrField

End Property
▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲

▼▼▼▼▼▼▼▼▼エラー▼▼▼▼▼▼▼▼▼
Microsoft VBScript 実行時エラー (0x800A000D)
型が一致しません。
▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲

回答No.1

msystem · ベストアンサー

はっきりしたことはいえませんが、VBからの戻り値がVariantの配列になってますね。
確か、VBSでは配列の戻り値はエラーになると思います。
VB側で、配列をVariant型の変数に格納し、それを戻してやってください。