winsock上传多个文件的问题。

我昨天写的winsock的上传下载的模块已经调试成功。我新建了一个窗体，将这一部分放在了新窗体中。
但是，今天我调用它来上传多个文件的时候出了问题。主窗体中用for next循环来上传多个文件，第一个文件漏传了，第二个文件上传成功了，上传第三个文件的时候，数据连接不成功程序弹出，后面的当然也没传了。要怎么解决呢？下面我将立即窗口的debug.print的消息传上来：
开始上传 d:\vb1.txt 文件
wscControl state is 0
220 Serv-U FTP Server v6.0 for WinSock ready...331 User name okay, need password.230 User logged in, proceed.200 Command okay.227 Entering Passive Mode (192,168,1,129,16,4)wscData state is 0
开始上传 d:\vb2.txt 文件
wscControl state is 7
200 Command okay.200 Type set to A.250 Directory changed to /mail200 STRU R ok.150 Opening ASCII mode data connection for vb2.txtwscData state is 0
开始上传 d:\vb3.txt 文件
wscControl state is 0
220 Serv-U FTP Server v6.0 for WinSock ready...331 User name okay, need password.230 User logged in, proceed.200 Command okay.227 Entering Passive Mode (192,168,1,129,16,8)wscData state is 9