НУ написать не вирус а маленький ,,антивирус,, .Я где то видел алгоритм проги на дельфи которая распростроняется по всей сети при помощи протокола ftp ,она копируется на все фтп в сети .