Microsoft VBScript runtime error '800a000d'

Type mismatch: 'rsEvt'

/nemrtmembers/nemrt/nemrt.inc, line 365