заменить файл на ftp

[munhauz]

Народ помогите
пытаюсь загрузить файл сформированный прогой на сервак по ftp
использую idftp

dm.IdFTP1.Username:= '_______';
dm.IdFTP1.Password:= 'xxxxxxxx';
dm.IdFTP1.Host:= 'мой_домен.ftp.narod.ru';
dm.IdFTP1.Port:=21;
dm.IdFTP1.Passive:= True;
if dm.IdFTP1.Connected then
dm.IdFTP1.Disconnect
else
try
dm.IdFTP1.Connect(True);
except
on E : Exception do
ShowMessage('Ошибка подключения: '+E.Message);
end;
if dm.IdFTP1.Connected then
try
dm.IdFTP1.Put(dir+'\Order\index.html', 'index.html', True);
except
on E : Exception do
ShowMessage('Ошибка закачки файла: '+E.Message);
end;

не хочет замещать уже существующий там файл
помогите
кто может делал такое уже ?

[Stilet]

Я так понимаю текст ошибки засекречен пентагоном, и находится в бараке Обамы за семью печатями.

[Планчик]

ну да как то так )))
в общем он не замещает файл на серваке
а просто дописывает его )))
как сделать что бы замещал

даже не так
он его по какой то причине не помещает на сервак
только если я захожу через TCM то файл копируеться
не могу понять что не так

[Stilet]

по какой то причине не помещает на сервак

Даже не вызывая исключение? Если так то не в твоем коде проблема а на сервере.

[munhauz]

в обшем я все разобрался все таки )))
итог :
1. файл не замешался если в окне браузера он был открыть (то есть страница открыта) - пока не выяснил почему
2. по тем же причинам он и не удалялся - это нужно для замещения файла иначе програ просто дописывает ваш файл в конец уже имеющегося
3. щас все нормально все закидываеться и удаляеться
кидаю код того что получилось

dm.IdFTP1.Username:= 'ваш логин';
dm.IdFTP1.Password:= 'ваш пароль';
dm.IdFTP1.Host:= 'имя ftp сервера';
dm.IdFTP1.Port:=21;
dm.IdFTP1.Passive:= True;
if dm.IdFTP1.Connected then
dm.IdFTP1.Disconnect
else
try
dm.IdFTP1.Connect(True);
except
on E : Exception do
ShowMessage('Ошибка подключения: '+E.Message);
end;
if dm.IdFTP1.Connected then
try
dm.IdFTP1.Delete('index.html');

dm.IdFTP1.Put(dir+'\Order\index.html', 'index.html', True);// путь и имя перемещаемого файла
except
on E : Exception do
ShowMessage('Ошибка закачки файла: '+E.Message);
end;

[kta87]

Сообщение от munhauz

в обшем я все разобрался все таки )))
итог :
1. файл не замешался если в окне браузера он был открыть (то есть страница открыта) - пока не выяснил почему

Именно по этому и не замещался. Попробуйте удалить файл, который открыт для редактирования.