Foxtable(狐表)用户栏目专家坐堂 → [求助]FTP大量下时出现fxdlif 问题


  共有2572人关注过本帖平板打印复制链接

主题:[求助]FTP大量下时出现fxdlif 问题

帅哥哟,离线,有人找我吗?
大红袍
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/5/2 11:43:00 [只看该作者]

不要重复new,而且你用完一定要close,不然你ftp的连接数会不断递增,直至所有的连接数用完。

 

Dim ftp1 As new ftpclient
ftp1.host="196.128.143.28"
ftp1.Account = "foxuser"
ftp1.password = "138238110"

For Each dr As DataRow In DataTables("商品档案").DataRows
    If FileSys.FileExists( ProjectPath & dr("商品条码") & ".jpg") = False  Then
        ftp1.Download(dr("图片列"),ProjectPath & dr("商品条码") & ".jpg")
    End If
Next

ftp1.close


 回到顶部