powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Помогите ПЛЗ!
14 сообщений из 14, страница 1 из 1
Помогите ПЛЗ!
    #34595285
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как из экселя удалить некий файл. Через Shell полагаю...
"Del xxxx.xxx" не работает.
Код: plaintext
1.
2.
3.
4.
5.
6.
Dim objShell As Object
Set objShell = CreateObject("WScript.Shell")

Dim varia As Variant
ChDir (catalog_xml) ' текущий каталог
varia = Shell("del /?")
не находит она Del, пишет файл не найден

помогите, кто знает
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34595304
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ЗЫ

там кусок от теста способа
objShell.Run ("del xxx.xxx")
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34595311
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kill Statement
Deletes files from a disk.
И не изобретайте велосипед.
И топики называйте нормально.
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34595339
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
big-duke Kill Statement
Deletes files from a disk.
И не изобретайте велосипед.
И топики называйте нормально.


Один раз назвал заумно, за две недели ни одного ответа :) Пардон, буду называть нормально в будущем.
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34595359
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не работает у меня почему-то kill ("путь к каталогу\*.zip")
53 ошибка... файл не найден
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34595375
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MSDN
In Microsoft Windows, Kill supports the use of multiple-character (*) and single-character (?) wildcards to specify multiple files.

Так что проверяйте файл на наличие. МБ что-нить с разрешениями на файловые операции у вас.
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34595462
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А как маску вообще ему передавать?
Я подозреваю что у меня
kill ("fff*.zip")
ищет в текущем каталоге файл с именем fff*.zip, а не маску...
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34595488
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не знаю, у мну все работает. Вы из процедуры запускаете или дебагера ?
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34600940
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
из дебагера...
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34600995
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в референс подключи "Microsoft Scripting Runtime"
Код: plaintext
1.
Dim objShell As New Scripting.FileSystemObject ' Object
objShell.DeleteFile ("C:\temp\fff*.zip")
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34601055
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо!
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34601349
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
udgeen69из дебагера...
из дебагера работать не будет, надо из кода вызывать.
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34603943
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
big-duke udgeen69из дебагера...
из дебагера работать не будет, надо из кода вызывать.

Простите за глупость, а редактор visual basic, чем в данной ситуации будет?
Что есть дебагер, а что код?
...
Рейтинг: 0 / 0
Помогите ПЛЗ!
    #34603985
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
udgeen69
Что есть дебагер, а что код?
...
Рейтинг: 0 / 0
14 сообщений из 14, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Помогите ПЛЗ!
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]