Microsoft VBScript runtime error '800a000d'

Type mismatch: 'cdbl'

/content/shop/shop_results_collection_new.asp, line 787