Checking a connection is open

How do you check to see if there is dial up connection open?

http://www.vbweb.co.uk/show.asp?id=1023