Microsoft VBScript runtime error '800a000d'

Type mismatch: 'UBound'

D:\HOME\HABY.CZ\SHOP\../_inc/domain.asp, line 49