ПереместитьФайл("C:\Temp\Order.htm", "C:\My Documents\Order.htm");    

 Если НайтиФайлы("C:\est.txt") <> Неопределено Тогда 

    ПереместитьФайл("C:\est.txt", "C:\estnew.txt"); 

    Сообщить("Файл перемещен."); 

Иначе 

    Сообщить("Действие не выполнено. Файл в источнике не найден."); 

КонецЕсли;   

 ФС.ПереименоватьФайл("transinvcust.dbf", "st.dbf"); 

 WshShell=СоздатьОбъект("WScript.Shell");

КодВозвр=WshShell.Run("RENAME C:\folder\test.txt test1.txt");

 КомандаСистемы("ren c:\A.txt B.txt"); 

 objFSO = Новый COMОбъект("Scripting.FileSystemObject"); 

objFolder = objFSO.GetFolder("C:\_1"); 

objFolder.Name = "_21";   

 //Возвращает Истина - скопирован, иначе Ложь 

Функция СкопироватьФайл(ИмяФайлаИсточник, ИмяФайлаНазначение, ВыдаватьСообщения = Ложь) Экспорт

	Попытка

		ПозицияСимвола = СтрДлина(ИмяФайлаНазначение);

		Пока ПозицияСимвола >= 1 Цикл

			Если Сред(ИмяФайлаНазначение, ПозицияСимвола, 1) = "\" Тогда

			Возврат ПозицияСимвола; 

			КонецЕсли;

		ПозицияСимвола = ПозицияСимвола - 1;	

		КонецЦикла;

		КаталогФайла=Сред(ИмяФайлаНазначение, 1, ПозицияСимвола - 1); 

		СоздатьКаталог(КаталогФайла);

		КопироватьФайл(ИмяФайлаИсточник, ИмяФайлаНазначение);

	Исключение

		Сообщение = "Ошибка при копировании: " + ОписаниеОшибки() + 

			" (источник: " + ИмяФайлаИсточник + "; приемник: " + ИмяФайлаНазначение + ")";

		Если ВыдаватьСообщения Тогда 

			Сообщить(Сообщение);

		КонецЕсли;					 

		Предупреждение(Сообщение);

		Возврат Ложь;

	КонецПопытки;

	Возврат Истина;

КонецФункции