Microsoft VBScript runtime error '800a0005'

Invalid procedure call or argument: 'mid'

/V1/Func_Main.asp, line 527