http://www.planet-source-code.com/vb/scripts/ShowCode.
asp?txtCodeId=728&lngWId=3
code:
Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!
Terms of Agreement:
By using this code, you agree to the following terms...
1) You may use this code in your own programs (and may compile it into a
program and distribute it in compiled format for languages that allow
it) freely and with no charge.
2) You MAY NOT redistribute this code (for example to a web site)
