Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Сохранить как / 3 сообщений из 3, страница 1 из 1
27.04.2004, 12:22
    #32498382
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сохранить как
Ребята, подскажите, плз, в "Shell" можно задать название файла с текущим временем???

Dim MyAppID, ReturnValue
ReturnValue = Shell("C:\Program Files\WinRAR\WinRAR.exe a W:\Logistic\Budgets\04\hty\Отчет & Format(Now, mm / dd) W:\Logistic\Budgets\Отчет04.mdb", 1)

Если просто "Отчет" - то работает, но если хочу привязать время - игнорирует эту добавку (Format(Now, mm / dd)
Если пишу ReturnValue = Shell("C:\Program Files\WinRAR\WinRAR.exe a W:\Logistic\Budgets\04\hty\Отчет" & Format(Now, mm / dd)" W:\Logistic\Budgets\Отчет04.mdb", 1), то ему не нравиться вторая половина строки

Stepler (щёлк-щёлк!!)
...
Рейтинг: 0 / 0
27.04.2004, 12:27
    #32498395
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сохранить как
Stepler - вы с raur не собратья?
Но тут в соседнем топике, тоже с winrar мается :)

ответ: можно
ReturnValue = Shell("C:\Program Files\WinRAR\WinRAR.exe a W:\Logistic\Budgets\04\hty\Отчет" & Format(Now, "mm/dd") & " W:\Logistic\Budgets\Отчет04.mdb", 1)
...
Рейтинг: 0 / 0
27.04.2004, 12:50
    #32498471
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сохранить как
Нет не собратья...
Спасибо, пропускал выделенное...
ReturnValue = Shell("C:\Program Files\WinRAR\WinRAR.exe a W:\Logistic\Budgets\04\hty\Отчет" & Format(Now, "mm/dd") & ".rar" & " W:\Logistic\Budgets\Отчет04.mdb", 1)
Stepler (щёлк-щёлк!!)
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Сохранить как / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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