Microsoft VBScript runtime error '800a0005'

Invalid procedure call or argument: 'RIGHT'

/Listpull(Promotion)-Generate.asp, line 33