Microsoft VBScript 実行時エラー エラー '800a000d'

型が一致しません。

/event/data/index.asp, 行 233