fatto!
ma adesso mi da questo errore:

Microsoft VBScript runtime error '800a0009'

Subscript out of range: '[number: 1]'

/snitzforum/admin_compactdb.asp, line 130

La linea 130:
GetForumDB = tmpFileName(1)