ftp 站点中是否存在指定文件名称的文件

Question

我做了一个vb德ftp上传程序，现在遇到问题！
我上传文件前需要先判断服务器中是否已经存在了此文件名的文件，我如何判断才好哪？在线等待！加急~~~~

Answer 1

遍历FTP服务器上的文件，有同名文件询问是否覆盖。

Answer 2

需要添加inet控件
Dim tstrs() as string
'inet控件的方法 查找远程主机的文件目录（vars.Remotedirshow）
    Form1.Inet1.Execute , "dir " + vars.Remotedirshow + subdir1 
While Form1.Inet1.StillExecuting = True
        DoEvents
 Wend
    'Inet控件的GetChunk方法得到目录路径数据
    Tstr = Form1.Inet1.GetChunk(0)    
    tstrs = Split(Tstr, vbCrLf)    
    For i = 0 To UBound(tstrs)
      tstrs(i)--这个就是文件名，遍历一遍就能得到某文件夹下所有的文件
    ...
    next

Answer 3

请问！！
Form1.Inet1.Execute , "dir " + vars.Remotedirshow + subdir1 在上一句中，vars.Remotedirshow 是什么？
            subdir1又是什么？
为什么我运行以上代码后，会出现很长的等待那？就好像死机一样？
vbCrLf 是什么意思啊？我是初学者！希望各位哥哥、姐姐指教！！！
多谢！！

Answer 4

Tstr = Form1.Inet1.GetChunk(0)    
    tstrs = Split(Tstr, vbCrLf)    
    For i = 0 To UBound(tstrs)
      tstrs(i)--这个就是文件名，遍历一遍就能得到某文件夹下所有的文件
    ...
    next以上这些加在什么位置？是在这里吗？
Private Sub Inet1_StateChanged(ByVal State As Integer)
……
……
End Sub