не могу подконнектиться по ftp и скачать файл

[HBasic]

Создал страницу на народе: http//www.myname.narod.ru .Закрнул туда каталоги для скачки.
Для того, чтобы скачать оттуда нужное по ftp протоколу написал следующий код:

adres="ftp.myname.narod.ru"
mylogin="myname"
mypassword=435432
filename="file.txt"

hINetSession = InternetOpen("program", 0, vbNullString, vbNullString, 0)
If hINetSession <= 0 Then a = MsgBox("ошибка создания соединения", vbOKCancel, " ")
hSession = InternetConnect(hINetSession, adres, "21", mylogin, mypassword, INTERNET_SERVICE_FTP, 0, 0)
If hSession <= 0 Then a = MsgBox("ошибка подключения", vbOKCancel, " ")
If FtpGetFile(hSession, filename, pachhtml + filename, False, 0, 1, 0) = False Then
MsgBox "Call to FtpGetFile Failed!"
End If
Call InternetCloseHandle(hSession)
Call InternetCloseHandle(hINetSession)

Не соединяеться-ошибка подключения.В чем моя ошибка?Пароль и логин для доступа верные.

[djalex777]

Попробуй пассивный режим - INTERNET_FLAG_PASSIVE

[HBasic]

Попробуй пассивный режим - INTERNET_FLAG_PASSIVE

попробовал.Не работает.Сдаеться мне, что я к сайту подключаюсь как-то неправильно.Может когда файл по ftp протоколу скачать адрес сайта как-то по другому писать надо?
Не подскажите как проверить на локальном хосте?Я пробовал с anonimus и noname ничего не получилось.
Помоги пожалуйста.Буду благодарен.

[djalex777]

А какой адрес ты указываешь для соединения с сервером? Для narod.ru адрес ftp сервера - ftp.narod.ru

[HBasic]

А какой адрес ты указываешь для соединения с сервером? Для narod.ru адрес ftp сервера - ftp.narod.ru

Адрес указываю ftp.myname.narod.ru

[alibek]

FAQ почитай.

[HBasic]

FAQ почитай.

Прочитал.Там про это ничего нет.

[djalex777]

Я же написал - для твоего хостинга строка коннекта должна быть ftp.narod.ru и в FAQ это написано тоже.