|
|
22.12.2010, 11:09
|
#1 |
|
NavAx
|
DAX 3.0. У нас у пользователей ярлык на рабочем столе на vbs скрипт (лежит в сети).
X++: Const DeleteReadOnly = True Dim Shell, fso, WshNetwork, AOS Set fso = CreateObject("Scripting.FileSystemObject") Set Shell = CreateObject("WScript.Shell") Set WshNetwork = WScript.CreateObject("WScript.Network") ' Очистка кэша mask = Shell.ExpandEnvironmentStrings("%UserProfile%\Local Settings\Application Data\*.aoc") If fso.FileExists(mask) Then fso.DeleteFile mask, DeleteReadOnly Shell.run("\\Server\dfs\AxClientStart\ok.axc") WScript.Sleep 1000 Set Shell = Nothing Set fso = Nothing Set WshNetwork = Nothing |
|
|
|
22.12.2010, 11:52
|
#2 |
|
MCT
|
Цитата:
Сообщение от raz
DAX 3.0. У нас у пользователей ярлык на рабочем столе на vbs скрипт (лежит в сети).
X++: ' Очистка кэша
mask = Shell.ExpandEnvironmentStrings("%UserProfile%\Local Settings\Application Data\*.aoc")
__________________
Sometimes there is a moment as you are awakening - when you become aware of the real world around you, - but you are still dreaming. - You may think you can fly but you do better not try. |
|
|
|
22.12.2010, 12:04
|
#3 |
|
NavAx
|
Цитата:
Сообщение от d&m
а для Vista и выше? там ведь путь уже другой...
|
|
|
| Теги |
| aoc, ax2009, активные пользователи, законченный пример, кэш, полезное |
|
|
|
Комбинированный вид
