How to kill Server Process

I am working on a Server/Client Application in VB 6.0. Server is a DCOM object and Client is a standard exe.
My problem is that the server component stops responding after the number of users exceeds to 15 or more, the clients are not able to connect to the server. I have to kill the server process and then only the clients are able to connect to the servers.

Is there any routine/program by which i can check if the server is active/responding and if not then it is killed automatically.

Thanks.

Vijay