HAMANN поищи такую фигню под vb. я ток недавно находил чёт подобное.всё идеально работало. код понятно дело отличается, зато там расписан весь принцип и все покеты показаны.
http://forum.uiny.ru/showthread.php?t=8759
http://forum.asechka.ru/showthread.php?t=105232
http://www.xaker.name/forvb/showthread.php?t=9262 оч вероятно, то пригодится