And by charging the authors to publish the paper in the first place. Although I think a lot of the money both ways comes from universities and other organisations that pay for publication costs and have deals with publishers.

Thank god for CS's culture of pre-prints on arXiv.