主题：关于FTP下载的问题

我想用远程升级，出现了这个窗口。
此主题相关图片如下：{j8y{34}j_0~m}6r7v)e(9s.png

我如果用这样的代码下载，是没有问题的。

Dim ftp1 As new ftpclient
ftp1.host= Vars("ip")
ftp1.Account = "Administrator"
ftp1.password = "Gzhito20120401"
If ftp1.FileExists("\zr\update.txt") Then
    If ftp1.FileExists("\zr\update.txt") Then
        If ftp1.Download("\zr\update.txt",ProjectPath & "COA\update.txt") = True Then
            MessageBox.show("下载成功")
        Else
            MessageBox.show("下载失败,请重新再试!")
        End If
    End If
End If

这样没有问题，可以下载的。

但我写成下载的：UpdatePath = "ftp://Administrator:Gzhito20120401@" & Vars("ip") & "/zr"

就会出现这个窗口，是什么原因啊？哪里写错了？