主题：FTP 内网连接测试总是失败，关于地址设置问题

Dim ftp1 As New FtpClient
ftp1.Host="10.10.253.44"
ftp1.Account = ""
ftp1.Password = ""
ftp1.Changedir("\共享")
If ftp1.Connected = False '如果FTP没有连接
    If ftp1.Connect Then '连接FTP
        ftp1.OpenManager() '如果连接成功,打开FTP客户端
    Else
        Messagebox.show("连接FTP失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    End If
End If