Microsoft VBScript compilation error '800a0411'

Name redefined

/include/commerce/inc_categorie.asp, line 4

Dim RS2, QSCat, QSSCat, icat
----^