Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Windows [игнор отключен] [закрыт для гостей] / Терминалка под 2003 и DOS-приложения / 14 сообщений из 14, страница 1 из 1
07.12.2006, 10:13
    #34182243
lissyara
lissyara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
Настругал скрипт:
Код: plaintext
1.
2.
3.
\\ts\scripts\deltree.exe /y "%UserProfile%\Local Settings\Temp\"
\\ts\scripts\deltree.exe /y "%UserProfile%\Local Settings\Temporary Internet Files\"
\\ts\scripts\deltree.exe /y "%tmp%"
\\ts\scripts\deltree.exe /y "%temp%"
Запихал в доменные политики. На локальных компах отрабатывает нормально, а вот под терминальными профилями - ничё не делает.
Даже если локально положить всё, а не по сети - тишина. deltree при запуске вообще ничё не выводит.
Я так понимаю - какое-то ограничение на запуск 16-битны приложений? Вот тока найти не могу где могли поставить (терминалка досталась по наследству, мало что дистр напильником точеный, так и потом прилично рихтовали). Самое поганое - вроде всё перерыл - и доменные и локальные политики...

P.S. deltree - это такая прога (DOS-овская) из дистра win98, с функционалом соответствующим названию.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.12.2006, 10:32
    #34182310
rrrrrrrrrr
rrrrrrrrrr
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
а
Код: plaintext
del %TEMP%\*.* /f /s /q
как вариант не рассматривали?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.12.2006, 10:57
    #34182436
lissyara
lissyara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
уже лучше, но директории не удаляет....
=======
интересно - всё же чем ему DOS-овская аппликуха не нравится.... Хорошая - лет 6 уже использую


Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.12.2006, 12:42
    #34182885
imkot
imkot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
Может это подойдет?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
On Error Resume Next

Const TEMPORARY_INTERNET_FILES = &H20&
Const LOCAL_SETTINGS_HISTORY = &H22&
Const TEMPORARY_FOLDER =  2 

Dim objShell, objFolder, objFolderItem, fso

Set objShell = CreateObject("Shell.Application")


Set objFolder = objShell.Namespace(TEMPORARY_INTERNET_FILES)
Set objFolderItem = objFolder.Self

myDeleteFolder objFolderItem.Path

Set objFolder = objShell.Namespace(LOCAL_SETTINGS_HISTORY)
Set objFolderItem = objFolder.Self

myDeleteFolder objFolderItem.Path

Set fso = CreateObject("Scripting.FileSystemObject")

Set objFolderItem = fso.GetSpecialFolder(TEMPORARY_FOLDER)

myDeleteFolder objFolderItem.Path


Sub myDeleteFolder(folderspec)
   Dim f, sf, f1
   Set f = fso.GetFolder(folderspec)
   Set sf = f.SubFolders
   For Each f1 in sf
      s = f.Path & "\" & f1.name
      fso.DeleteFolder s, true
   Next
   Set sf = f.Files
   For Each f1 in sf
      s = f.Path & "\" & f1.name
      fso.DeleteFile s, true
   Next
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.12.2006, 12:51
    #34182931
lissyara
lissyara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
занатые файлы пропустит? Или выпадет на первом же?
Я не знаю vbs/wsh поэтому не берусь утверждать - подойдёт или нет
Попроще бы чё - чтоб парааметром пеердавать путь и запускать



Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.12.2006, 12:59
    #34182966
imkot
imkot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
Занятые пропустит.
Параметры передаются в процедуру, которая собственно и удаляет папку. А начало скрипта - это получение имен трех папок.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.12.2006, 13:10
    #34183027
imkot
imkot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
Можно попробовать такой вариант

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
On Error Resume Next

For i =  0  to WScript.Arguments.Count- 1 
    WScript.Echo WScript.Arguments.Unnamed(i)
next

Sub myDeleteFolder(folderspec)
   Dim f, sf, f1
   Set f = fso.GetFolder(folderspec)
   Set sf = f.SubFolders
   For Each f1 in sf
      s = f.Path & "\" & f1.name
      fso.DeleteFolder s, true
   Next
   Set sf = f.Files
   For Each f1 in sf
      s = f.Path & "\" & f1.name
      fso.DeleteFile s, true
   Next
End Sub

Из командной строки вызывается например так
Код: plaintext
cscript  2 .vbs "%TEMP%" "%USERPROFILE%"
Выведет на экран две папки.
Если
Код: plaintext
WScript.Echo WScript.Arguments.Unnamed(i)
заменить на
Код: plaintext
myDeleteFolder WScript.Arguments.Unnamed(i)
То должна удалять папки, которые в параметрах передаются.
Только вот надо попробовать чего она будет делать когдачерез политики вызывается.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.12.2006, 13:15
    #34183051
imkot
imkot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
Я в WSH собственно тоже не специалист :))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2006, 08:58
    #34185075
rrrrrrrrrr
rrrrrrrrrr
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
Сегодня примерно такая же задача возникла. Воспользовался sdelete.exe , точнее,
Код: plaintext
sdelete /s имя_папки
Преимущество: затирает мусором все удаляемые файлы, т.е. не восстановишь.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2006, 11:54
    #34185716
imkot
imkot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
rrrrrrrrrrСегодня примерно такая же задача возникла. Воспользовался sdelete.exe , точнее,
Код: plaintext
sdelete /s имя_папки
Преимущество: затирает мусором все удаляемые файлы, т.е. не восстановишь.
А оно надо в штатном режиме так удалять?
Юзьвери постоянно восстанавливают содержимое?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2006, 12:18
    #34185767
rrrrrrrrrr
rrrrrrrrrr
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
иногда надо, особенно если для совместимости с ДОС-программами временный каталог вне профиля и может оказаться доступен для другого юзера... а так - нет, конечно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2006, 12:31
    #34185812
aleks2
aleks2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
D:\>rmdir/?
Removes (deletes) a directory.

RMDIR [/S] [/Q] [drive:]path
RD [/S] [/Q] [drive:]path

    /S      Removes all directories and files in the specified directory
            in addition to the directory itself.  Used to remove a directory
            tree.

    /Q      Quiet mode, do not ask if ok to remove a directory tree with /S

Была еще в DOS 3.0
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2006, 13:52
    #34186213
imkot
imkot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
Гы.
Все оказалось гораздло проще
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2006, 16:03
    #34186753
lissyara
lissyara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Терминалка под 2003 и DOS-приложения
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Windows [игнор отключен] [закрыт для гостей] / Терминалка под 2003 и DOS-приложения / 14 сообщений из 14, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 430ms
Закрыть
start [/forum/topic.php?fid=26&tablet=1&tid=1508745]:
 0ms
get settings:
 5ms
get forum list:
 10ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 165ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 29ms
get tp. blocked users:
 1ms
others: 205ms
total:  430ms
x
x
Закрыть


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