请教高手，为什么不能调用vb写的组件了？

[dsx666]

1、几天前好用
2、机器这几天染了病毒，但已用诺顿隔离。病毒大概叫：bloodhound.vbworm 的。。。
3、发现程序不能正常运行，发现内部服务器错误
检查发现者句错了
set upload=server.CreateObject("Upload.BBS")
4、重新注册组件，还是出现内部服务器错误。
5、在其他机器好用
6、不想重装机器，该怎么恢复？？