Do While NOT rs.EOF
Loop
вставить rs.MoveNext
Так вот при этом PWS зацикливается, причем не так, как VB - там то просто прогу вырубил Ctrl_Break'ом, а здесь просто намертво висит (ВСЯ система). Может кто-нить знает, как избавиться от такого "глобального" зависания.
P.S. Я, конечно, понимаю, что не следует забывать MoveNext
