Microsoft VBScript runtime error '800a0006'

Overflow: 'cint'

/addToCartoccasion.asp, line 18