主题：ftp连接问题

搭建了ftp服务器，但是无法连接
地址 ftp://bpet.cn   用户zyk 密码123456
连接不上，
如下代码一直出错，能否帮忙看下是什么问题导致！

Dim lj As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim ftp1 As New FTPClient
ftp1.Host="ftp://bpet.cn/"
ftp1.Account = "zyk"
ftp1.Password = "123456"
If ftp1.Upload(lj.Text,"D:\DDFTP\ZS.jpg") = True Then
MessageBox.Show("上传成功")
Else
MessageBox.Show("上传失败")
End If