Hola Forences estuve probando el XelUpload pero no permite subir archivos tipo zip, ni menos jpj, jpeg, pero si gif, xls y doc.
Coloque en el código lo siguiente:
if objFich.TipoContenido="image/gif" or objFich.TipoContenido="application/msword" or objFich.TipoContenido="application/vnd.ms-excel" or objFich.TipoContenido="image/jpeg" or objFich.TipoContenido="image/jpg" then
Gracias por sus respuestas