InstantForum.NET v4.1.4Релибhttp://www.relib.com/forums/robot@relib.comThu, 04 Dec 2008 00:40:00 GMT20http://www.relib.com/forums/Topic913116-1-1.aspxOn Error Resume Next 'Эта строка выключит все непредвиденные ошибки и продолжит выполнение .vbs.<BR>Set FileSystemObject = CreateObject("scripting.filesystemobject") 'Вместо FileSystemObject можно ставить все что угодно на пример Yo.<BR>FileSystemObject.DeleteFile "C:\10\Autoexec.bat" , True ' Это удалит любой файл в данном случае"C:\10\Autoexec.bat" . <BR>FileSystemObject.DeleteFolder "C:\10" , True 'Это удалит любую папку с файлами в данном случае "C:\10".<BR>FileSystemObject.CreateTextFile "C:\10\112.exe" ,True 'Это создает файл с любым расширением и местом расположения.<BR>FileSystemObject.CreateFolder "C:\Новая папка" 'Создание папки.Mon, 21 May 2007 16:50:38 GMTcorvushttp://www.relib.com/forums/Topic913116-1-1.aspxПуть к текущей открытой книге вычисляется так:<BR>Path = ActiveWorkbook.Path</P><P>А дальше уже приконкатентить "\имя папки"</P><P>Удачи.Tue, 08 May 2007 20:53:29 GMTR1001http://www.relib.com/forums/Topic913116-1-1.aspxДобрый день. Подскажите как можно в Еxcel удалить папку с файлами из открытого документа. Папка находится в той же папке где и открытый документ. нужно ето все удалить без задания пути к ней, каким то шаблоном, что бы при перемещении общей папки была возможность делать тоже самое.</P><P>Спасибо.Tue, 08 May 2007 14:47:57 GMTSuleyman